T.Test一次跨多个列？

Question

我正在尝试同时在许多不同的列上进行T检验，但无法弄清楚如何做到这一点。以下是其中一列Clout。

的内容

t.test(wf[wf$ThreadID == 249001,]$Clout,wf[wf$ThreadID == 230005,]$Clout)

但我有大约20个其他专栏，例如Authentic，Tone

如何在所有列中运行此测试？

Answer 1

请尝试以下操作。

n <- ncol(wf)
inx1 <- which(wf$ThreadID == 249001)
inx2 <- which(wf$ThreadID == 230005)
ttest_list <- lapply(seq_len(n), function(j) t.test(wf[inx1, j], wf[inx2, j]))

注意：如何确保wf$ThreadID == 249001和wf$ThreadID == 230005这样的元素数量足够多？