如何在兩個數據框列表上應用函數？

Question

我有兩個數據框列表。 我們稱它們為 list_A 和 list_B。

df1 = data.frame(matrix(rnorm(4), nrow=2))
df2 = data.frame(matrix(rnorm(4), nrow=2))
df3 = data.frame(matrix(rnorm(4), nrow=2))
df4 = data.frame(matrix(rnorm(4), nrow=2))

list_A <- list(df1,df2)
list_B <- list(df3,df4)

我現在如何以元素明智的方式在列表上應用一些自定義功能？ 例如，將 df1 乘以 df3，將 df2 乘以 df4。 然后該函數應該獲取列表的前兩個數據幀，將它們定義為矩陣並將它們相乘。

Answer 1

我們可以使用Map將函數應用於 'list_A' 和 'list_B' 的對應元素

Map(`*`, list_A, list_B)

正如@RHertel 在評論中提到的，如果需要的功能是%*%

 Map(function(x,y) as.matrix(x) %*% as.matrix(y), list_A, list_B)