如何在lapply中创建多个子集

Question

我需要在多个数据子集上运行相同的模型。下面是一些模拟数据。假设我想进行3次t检验，所有检验都比较var1和var2，但每次检验都基于group的3个值进行数据子集。最好的方法是什么？

d <- data.frame(var1=rnorm(10), 
            var2=rnorm(10), 
            group=sample(c(1:3), 10, replace=TRUE))

Answer 1

试试这个：

lapply(split(d,d$group), function(df) t.test(x=df$var1,y=df$var2))