• h rg erg re ef

    https://www.deviantart.com/sports-today/journal/ReddiT-StreamS-Honda-Indy-Grand-2021-livestream-876777618 https://www.deviantart.com/sports-today/journal/livestream-Honda-Indy-Grand-2021-Live-Stream-876777631 https://www.deviantart.com/sports-today/journal...
    由 发布于 rgerg

  • Rtweet multiple user bios?

    I saw something about user.description in another post but cannot find a way on Rtweet to get user bio information. Is this the same as status? I have ~300 handles that i'm analyzing for bio details, tweets, followers vs following
    由 发布于 twitterrrtweet

  • using diff in mutate pipeline error due to first value

    I am trying to do this: df <- data.frame(y = seq(1, 100, 1)) %>% mutate( test = 100 * diff(log(y)) ) and get: Error: Problem with `mutate()` input `test`. x Input `test` can't be recycled to size 100. i Input `test` is `diff(y)`. i Input `...
    由 发布于 r

  • Replace value with previous row if match the condition

    I have a dataframe: df=data.frame('Id'=c(101,101,102,102,103,103,104,104),'values'=c('a','b','a','c','a','d','a','c')) I want to filter if there is any value b then it should be replaced by its previous row value. I have tried this code but it's not worki...
    由 发布于 rdplyr

  • Counting the number of same elements in each class

    According to the following table, I have many different teachers(10,11,12,...) with different ideas(1,2,... for example 1:Very Good, 2:Good,... ) of each class (1,2,3,...). Some teachers don't have any idea about some classes. class Teacher-code Opinion ...
    由 发布于 rcount

  • knn风险投资knn.cv公司在R解释中

    我用的是knn和knn.cv公司做一些预测。我是这样从knn开始的 model = knn(train, test, cl=y_train$DEATH_EVENT, k = k) 我知道这个函数创建了一个包含所有tre训练数据的“地图”，然后使用k近邻来预测测试数据的值。然后我可以创建混淆矩阵并得到预测的准确性。 model.cv = knn.cv(dd[,-c(13)], cl=dd[,c(13)]$DEATH_EVENT, k = k ) 因此，该函数将为每个cv步骤创建一个新的训练和测试分割，然后...
    由 发布于 knnrcross-validation

  • 在来自其他包的S4类之间创建转换方法

    Suppose I want to create an R package which defines coercion methods (methods::as) between S4 classes which are defined in other packages. 当我用自己的S4类创建包时，我可以添加与其他类之间的转换，如下所示： setAs("MyClass", "OtherClass", function(from) myfun(from)) 一旦包被加载，只要类被正确导出，这些就可以正...
    由 发布于 rs4

  • 在ggplot/geom\u文本中指定aes填充的颜色梯度？

    我试着用ggplot做一个条形图，用两个不同的pValue列表来渐变填充（i）条形图本身和（ii）放置在每个条形图上的文本标签。我在网上搜罗了一下 ggplot(plots, aes(x=names, y=values)) + geom_bar(stat = "identity", aes(fill=pvalues1)+ geom_text(aes(x=names y=values, color=pvalues2),fontface="bold", hjust=i...
    由 发布于 rggplot2

  • R： 在同一图上绘制多个置信区间

    我用的是R编程语言。我试图学习如何在同一个图上绘制多个时间序列，以及包括它们的置信区间（在本例中，是它们的最大值和最小值）。 假设我有两个这样的时间序列： library(xts) library(ggplot2) library(dplyr) library(plotly) library(lubridate) #time series 1 date_decision_made = seq(as.Date("2014/1/1"), as.Date("2016/1/1"),by="day") prope...
    由 发布于 rtime-seriesdata-visualizationplotlydplyr

  • 如何在R中随机生成包含分类变量的数据集？

    以前在论坛上也有人问过类似的问题，但是对于我的问题，这个问题还不够详细。 我正在尝试生成一个包含8列和50000行的随机数据集。每列必须是一个分类变量（我的例子，犬种）与3个级别（例如，颜色），导致在大约相等的比例。 下面的代码行正是我要找的，但是如何修改它以适应以下值？ 狗的品种，而不是“8”-（贵宾犬，拉布拉多犬，哈巴狗，吉娃娃，牧羊犬，狮子狗，牛头犬） 颜色，而不是“字母”-（棕色、黑色、白色） df <- data.frame(replicate(8,sample(LETTERS[1:3], 500...
    由 发布于 randomrdatasetcategorical-datalevels

  • 月变季

    我在R工作。我有一个数据框，其中我有采样日期，全名采样日期的月份，和水温。下面是我的数据框示例。 Date Month Temperature 2016-07-01 July 13 2017-01-08 January 5 2018-09-19 September 11 2019-10-24 October 9 我要做的是使用月份并创建一个新列，在其中标记季节。为了这个项目的目的...
    由 发布于 labelr

  • 如何根据X和Y值填充矩阵

    如果有帮助的话，这就是原始矩阵。我在试着做A部分。 我对R是完全陌生的，就像6天新的一样。我们的老师只是给了我们这些问题，几乎没有任何解释。有没有一种方法可以用更自动化的方式来填充图像中的矩阵，而不是一个接一个地做每件事。 x_and_y_val <- matrix(c(3,4,2,2,1,3,-1,1,0, 0),ncol=2,byrow=TRUE) colnames(x_and_y_val) <- c("x","y") rownames(x_and_y_val) <- c("","", "", "",...
    由 发布于 matrixr

  • 大于在R数据帧中返回错误答案

    我发现我的R数据帧有一个非常奇怪的问题。简言之，我有一个公式，用来比较一行中的两个分数，然后将获胜者放在一列中： scores$Winner <- ifelse(scores$Away_Score > scores$Home_Score, scores$Away_Team, scores$Home_Team) This seems to work for the most part, but there is one row where the lower score, not higher sco...
    由 发布于 rif-statementdplyr

  • 在散点图中标记2个变量

    library(ggplot2) library(dplyr) #install.packages("ggrepel") library(ggrepel) #Code mpg %>% mutate(Color=ifelse(class == '2seater','2seater','Other')) %>% ggplot(aes(displ, hwy, colour = Color)) + geom_point() + geom_text_repel(aes(label = ifelse(...
    由 发布于 rggplot2labeling

  • 求整行的平均值

    需要知道每一个命令的含义。用于求整行的平均值。但它也包含字符类型。所以使用了这个代码。 rowMeans(sapply(iris, function(x) as.numeric(as.character(x))), na.rm = T)
    由 发布于 r

  • 将vcov矩阵添加到AER:：tobit

    I want to supply a vcov matrix to AER::tobit. If I look in https://rdrr.io/cran/AER/src/R/tobit.R, I see this option: vcov.tobit <- function(object, ...) { vc <- NextMethod() if(is.null(colnames(vc))) { nam <- names(object$coefficients) nam...
    由 发布于 rfunctionlm

  • 如何将图从Cytoscape导入到R？

    我在cytoscape中生成了一个网络模型，并希望使用R对其进行一些分析。但是，我不确定如何将我的图形从cytoscape导入到R中的一个可分析形式中。我尝试将其作为SIF文件和XGGML文件读入R中，但到目前为止都没有成功。我找到的所有函数要么导致错误，要么已过时。 有人知道我怎么能把细胞图读入R吗？ 非常感谢！
    由 发布于 rgraph-theorycytoscape
签到
0
立即签到
积分排行
友情链接 查看更多>>