r - R: 相関テスト用の 1 行のコード

Question

2 つの異なるデータ フレームがあります。計算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 列あります。このすべてを 1 行のコードで書く方法を教えてください。

ありがとう！

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)