r - R：相关测试的一行代码

Question

我有两个不同的数据框。从我计算Richness的一个和另一个Environmental Variables我希望相互关联的另一个中，我的代码如下所示：

cor.test(Richness, E.4$Temp...C.)
cor.test(Richness, E.4$Cond..µS.cm.1.)
cor.test(Richness, E.4$pH)
cor.test(Richness, E.4$Alkalinity.Gran..mequiv.m.3.)
cor.test(Richness, E.4$HCO3)
cor.test(Richness, E.4$NO3.N..mg.m.3.)
cor.test(Richness, E.4$SO4..mg.l.)

这只是一个简短的例子。E.4 数据框有 30 列。您能否帮助我了解如何为所有这些编写一行代码？

谢谢！

Answer 1

你去：

df1 <- data.frame(Richness = 1:100)
df2 <- data.frame(Var1 = df1$Richness + rnorm(100), Var2 = rnorm(100))


lapply(1:ncol(df2), function(x) cor.test(df1$Richness, df2[ ,x]))

更新：

对于您可以使用的 p 值：

sapply(1:ncol(df2), function(x) cor.test(df1$Richness, df2[ ,x])$p.value)