对于大数据,按组进行R引导统计

发布时间：2020-12-17 21:32:19 所属栏目：安全来源：网络整理

导读：我想引导一个包含组的数据集.一个简单的场景是引导简单的方法： data - as.data.table(list(x1 = runif(200),x2 = runif(200),group = runif(200)0.5))stat - function(x,i) {x[i,c(m1 = mean(x1),m2 = mean(x2)),by = "group"]}boot(data,stat,R = 10) 这给

我想引导一个包含组的数据集.一个简单的场景是引导简单的方法：

data <- as.data.table(list(x1 = runif(200),x2 = runif(200),group = runif(200)>0.5))
stat <- function(x,i) {x[i,c(m1 = mean(x1),m2 = mean(x2)),by = "group"]}
boot(data,stat,R = 10)

这给了我错误的矩阵下标数量,因为by =“group”部分.我设法使用子集来解决它,但不喜欢这个解决方案.是否有更简单的方法使这种任务工作？

特别是,我想在统计函数中引入一个额外的参数,如stat(x,i,groupvar),并将其传递给引导函数,如boot(data,stat(groupvar = group),R = 100)？

解决方法

这应该这样做：

data[,list(list(boot(.SD,R = 10))),by = group]$V1

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!