如何一次取出每1500列中的第二个和第三个元素(如c(3,5)，c(5,7))，并通知一个矩阵

Question

a <- list(c(1,3,5), c(22,5,7),c(7,9,10))

一个列表中有1500个列(如c(1,3,5(、c(22,5,7(。我想一次取出每1500列中的第二个和第三个元素(如c(3,5(，c(5,7((，并通知一个矩阵。怎么做？

Answer 1

可能，您需要：

sapply(a, `[`, 2:3)
#     [,1] [,2] [,3]
#[1,]    3    5    9
#[2,]    5    7   10

Answer 2

我们可以使用tail

sapply(a, tail, 2)
#      [,1] [,2] [,3]
#[1,]    3    5    9
#[2,]    5    7   10