如何使用R语言转置具有固定行间距的矩阵?

Question

如何使用R语言每六行转置以下矩阵?也就是说，在调换之后，第一行变成数字1-6，第二行变成数字7-12，以此类推。最后得到一个10*6矩阵。

simple <- matrix(1:60,nrow=60,ncol=1)

诚问学者。

Answer 1

您可以启用byrow

> matrix(simple, ncol = 6, byrow = TRUE)
[,1] [,2] [,3] [,4] [,5] [,6]
[1,]    1    2    3    4    5    6
[2,]    7    8    9   10   11   12
[3,]   13   14   15   16   17   18
[4,]   19   20   21   22   23   24
[5,]   25   26   27   28   29   30
[6,]   31   32   33   34   35   36
[7,]   37   38   39   40   41   42
[8,]   43   44   45   46   47   48
[9,]   49   50   51   52   53   54
[10,]   55   56   57   58   59   60

Answer 2

与dim

t(`dim<-`(simple, c(6, 10)))
[,1] [,2] [,3] [,4] [,5] [,6]
[1,]    1    2    3    4    5    6
[2,]    7    8    9   10   11   12
[3,]   13   14   15   16   17   18
[4,]   19   20   21   22   23   24
[5,]   25   26   27   28   29   30
[6,]   31   32   33   34   35   36
[7,]   37   38   39   40   41   42
[8,]   43   44   45   46   47   48
[9,]   49   50   51   52   53   54
[10,]   55   56   57   58   59   60