R 按行填充数组

我想做一些矩阵运算，最好使用 3 维（或更高）维数组。如果我想填matrices按行有一个参数（拜罗 = TRUE）但是没有这样的选项来创建/填充多维array。我能够实现它的唯一方法是使用aperm转置由列填充的数组。例如：

arr.1 <- array(1:12, c(3,2,2))

arr.1

arr.2 <- aperm(arr.1, c(2,1,3))

arr.2

生成正确的结果，即按行填充的 2,3,2 维数组。必须从 Column x Row x Range 数组向后工作才能得到 Row x Column x Range 数组，这似乎有点违反直觉。这可能是以前 f77 编码的坏习惯，还是我忽略了一些简单的事情？

R 中的数组由以下内容填充首先遍历第一维度。因此，首先遍历第一个维度，然后遍历第二个维度，然后遍历第三个维度（如果可用）。

如果是矩阵：

array(c(1,2,3), dim = c(3,3))

     [,1] [,2] [,3]
[1,]    1    1    1
[2,]    2    2    2
[3,]    3    3    3

或者通过赋值：

M <- array(dim = c(3,3))
M[,] <- c(1,2,3)
M

     [,1] [,2] [,3]
[1,]    1    1    1
[2,]    2    2    2
[3,]    3    3    3

分配给第二个维度很容易：

M <- array(dim = c(3,3))
M[,2:3] <- c(1,2,3)
M

     [,1] [,2] [,3]
[1,]   NA    1    1
[2,]   NA    2    2
[3,]   NA    3    3

但分配给第一维更加棘手。以下没有给出预期结果：

M <- array(dim = c(3,3))
M[2:3,] <- c(1,2,3)
M

     [,1] [,2] [,3]
[1,]   NA   NA   NA
[2,]    1    3    2
[3,]    2    1    3

通过首先遍历第一个维度，然后遍历第二个维度来填充数据。我们想要的是先穿越第二维度，然后才是第一维度。所以我们必须aperm https://stat.ethz.ch/R-manual/R-devel/library/base/html/aperm.html数组（或在矩阵的情况下转置）。

M <- array(dim = c(3,3))
Mt <- aperm(M)
Mt[,2:3] <- c(1,2,3)
M <- aperm(Mt)
M

     [,1] [,2] [,3]
[1,]   NA   NA   NA
[2,]    1    2    3
[3,]    1    2    3

也许有更优雅的方法来完成我不知道的最后一项。