是否有可能以某种方式针对相同的分类变量对多个变量执行t.test,而不进行如下数据集的重新整形？
data(mtcars)
library(dplyr)
library(tidyr)
j <- mtcars %>% gather(var, val, disp:qsec)
t <- j %>% group_by(var) %>% do(te = t.test(val ~ vs, data = .))
t %>% summarise(p = te$p.value)
我试过用
mtcars%>%summarise_each_(funs =(t.test(.~vs))$ p.value,vars = disp:qsec)
但它会引发错误.
奖励:如何t %>% summarise(p = te$p.value)还包括分组变量的名称？