Question

我在试图解决这个问题时遇到了一些麻烦。

我有3个数据框的列表：

list_of_dataframes = list(iris, trees, mtcars)

我需要使用mapply返回一个列表：

第一个元素是list_of_dataframe的第一个数据框的第一列
第二个元素是list_of_dataframe第二个数据框的第二列
第三个元素是list_of_dataframe的第三个数据框的第三列

Answer 1

如果你想要返回原子矢量，它将是

mapply("[", list_of_dataframe, 1:3)

但是如果你想要返回单列数据帧，你可以做

Map("[", list_of_dataframe, 1:3)

或仅在SIMPLIFY = FALSE中使用mapply()。或者，您可以使用subset()。

mapply(subset, list_of_dataframe, select = 1:3)

Answer 2

我们还可以使用map2包中的purrr函数来遍历数据框列表（在.x参数上）和列1:3的索引（在.y参数上）。

list_of_dataframes <- list(iris, trees, mtcars) 

library(purrr)

map2(list_of_dataframes, 1:3, ~.x[, .y])
[[1]]
  [1] 5.1 4.9 4.7 4.6 5.0 5.4 4.6 5.0 4.4 4.9 5.4 4.8 4.8 4.3 5.8 5.7 5.4 5.1 5.7 5.1
 [21] 5.4 5.1 4.6 5.1 4.8 5.0 5.0 5.2 5.2 4.7 4.8 5.4 5.2 5.5 4.9 5.0 5.5 4.9 4.4 5.1
 [41] 5.0 4.5 4.4 5.0 5.1 4.8 5.1 4.6 5.3 5.0 7.0 6.4 6.9 5.5 6.5 5.7 6.3 4.9 6.6 5.2
 [61] 5.0 5.9 6.0 6.1 5.6 6.7 5.6 5.8 6.2 5.6 5.9 6.1 6.3 6.1 6.4 6.6 6.8 6.7 6.0 5.7
 [81] 5.5 5.5 5.8 6.0 5.4 6.0 6.7 6.3 5.6 5.5 5.5 6.1 5.8 5.0 5.6 5.7 5.7 6.2 5.1 5.7
[101] 6.3 5.8 7.1 6.3 6.5 7.6 4.9 7.3 6.7 7.2 6.5 6.4 6.8 5.7 5.8 6.4 6.5 7.7 7.7 6.0
[121] 6.9 5.6 7.7 6.3 6.7 7.2 6.2 6.1 6.4 7.2 7.4 7.9 6.4 6.3 6.1 7.7 6.3 6.4 6.0 6.9
[141] 6.7 6.9 5.8 6.8 6.7 6.7 6.3 6.5 6.2 5.9

[[2]]
 [1] 70 65 63 72 81 83 66 75 80 75 79 76 76 69 75 74 85 86 71 64 78 80 74 72 77 81 82
[28] 80 80 80 87

[[3]]
 [1] 160.0 160.0 108.0 258.0 360.0 225.0 360.0 146.7 140.8 167.6 167.6 275.8 275.8
[14] 275.8 472.0 460.0 440.0  78.7  75.7  71.1 120.1 318.0 304.0 350.0 400.0  79.0
[27] 120.3  95.1 351.0 145.0 301.0 121.0

如何使用mapply（）提取列表中某个数据帧的某一列？

2 个答案: