如何访问索引列表中的每个元素？

Question

我使用长度为k的列表（例如k = 4）和矩阵。我想访问列表中没有for和while的每个元素。列表元素是矩阵的索引。

玩具问题

l <- list(x1 = 1:10, x2 = c(2,3,4,5,6), x3 = c(2, 5), x4 = c(3,2,1))
data <- matrix(rnorm(40), nrow = 10)

输出所需

data[l[[1]], ]
data[l[[2]], ]
data[l[[3]], ]
data[l[[4]], ]