r - 如何访问 R 中嵌套列表中的特定命名列表

Question

我有以下嵌套列表:

foo <- list(list(x = 1:10, y = 11:25), list(x = 1:10, y = 100:110))

看起来像这样:

> foo
[[1]]
[[1]]$x
 [1]  1  2  3  4  5  6  7  8  9 10

[[1]]$y
 [1] 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25


[[2]]
[[2]]$x
 [1]  1  2  3  4  5  6  7  8  9 10

[[2]]$y
 [1] 100 101 102 103 104 105 106 107 108 109 110

我想做的只是访问包含此对象的列表的 y 部分:

 [[1]]
 [1] 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25


[[2]]
 [1] 100 101 102 103 104 105 106 107 108 109 110

我怎样才能做到这一点？

Answer 1

我们可以使用lapply

lapply(foo, `[[`, 'y')

#[[1]]
# [1] 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25

#[[2]]
# [1] 100 101 102 103 104 105 106 107 108 109 110

或者从rvest

pluck

rvest::pluck(foo, 'y')