将矩阵的部分存储在列表对象中？在R

Question

我有一个矩阵，我喜欢在重叠部分自动分割并将结果存储在单个列表对象中。我喜欢没有循环的解决方案。

mat = matrix(c(1:24), 4)

list = NULL 
list[[1]] = mat[,c(1:2)]
list[[2]] = mat[,c(2:3)]
list[[3]] = mat[,c(3:4)]
list[[4]] = mat[,c(4:5)]
list[[5]] = mat[,c(5:6)]

预期输出

list

这就是我喜欢的，但不使用循环。

Answer 1

试试这个：

lapply(seq_len(ncol(mat)-1), function(i) mat[,c(i,i+1)])