如何通过R中的每一列子矩阵

Tia*_*ian 2 r matrix

在R中如果我有一个矩阵说:

1 2 3
1 2 3
1 2 3
Run Code Online (Sandbox Code Playgroud)

是否有一种快速的方法将每个列的矩阵划分为子矩阵?分开后,左边的部分是:

1
1
1
Run Code Online (Sandbox Code Playgroud)

然后

1 2
1 2
1 2
Run Code Online (Sandbox Code Playgroud)

然后

1 2 3
1 2 3
1 2 3
Run Code Online (Sandbox Code Playgroud)

akr*_*run 5

我们可以做的

lapply(seq_len(ncol(m1)), function(i) m1[, seq_len(i)])
Run Code Online (Sandbox Code Playgroud)