R中的分裂矩阵
我试图沿行拆分矩阵,但不确定如何执行。例如,如果我有一个NxM矩阵,但想拆分该矩阵,从而得到n(n/n)个xM矩阵,我该如何做 如果我有一个矩阵X:R中的分裂矩阵,r,R,我试图沿行拆分矩阵,但不确定如何执行。例如,如果我有一个NxM矩阵,但想拆分该矩阵,从而得到n(n/n)个xM矩阵,我该如何做 如果我有一个矩阵X: [,1] [,2] [1,] 1 21 [2,] 2 22 [3,] 3 23 [4,] 4 24 [5,] 5 25 [6,] 6 26 [7,] 7 27 [8,] 8 28 [9,] 9 29 [10,] 10 30
[,1] [,2]
[1,] 1 21
[2,] 2 22
[3,] 3 23
[4,] 4 24
[5,] 5 25
[6,] 6 26
[7,] 7 27
[8,] 8 28
[9,] 9 29
[10,] 10 30
[11,] 11 31
[12,] 12 32
[13,] 13 33
[14,] 14 34
[15,] 15 35
[16,] 16 36
[17,] 17 37
[18,] 18 38
[19,] 19 39
[20,] 20 40`
如果n=2,则功能块(X,n)的输出为
[[1]]
[,1] [,2]
[1,] 1 21
[2,] 2 22
[3,] 3 23
[4,] 4 24
[5,] 5 25
[6,] 6 26
[7,] 7 27
[8,] 8 28
[9,] 9 29
[10,] 10 30
[[2]]
[,1] [,2]
[1,] 11 31
[2,] 12 32
[3,] 13 33
[4,] 14 34
[5,] 15 35
[6,] 16 36
[7,] 17 37
[8,] 18 38
[9,] 19 39
[10,] 20 40
提前谢谢你的帮助 我们创建一个要拆分的分组列
n <- 10
grp <- (seq_len(nrow(X)) - 1) %/% n + 1
split(as.data.frame(X), grp)
数据
X@RyanChannrow(X)/n
与n的示例不匹配抱歉,你是对的,我想你需要X[I:(I+nrow(X)/n-1),]
lapply(seq(1, nrow(X), by = n), function(i) X[i:(i+n -1), ])
X <- matrix(1:40, ncol = 2)