R 语言 对两个数据框用t 检验（t test）

p_value <- sapply(1:nrow(sample1), function(x) t.test(sample1[x,], sample2[x,],alternative = 'two.sided',var.equal = FALSE)$p.value) 

当样本储存在两个数据框中时，可以用for循环来做，也可以用上述代码的sapply，t.test有一些参数需要根据自己的需要做调整。