如何在應用中指定「綁定方法」

Question

說，我有一個包含2行和3列的矩陣m，以及一個函數，該函數接受一個數值類型的參數並返回一個向量。例如，

f <- function(x){ 
    rep(x,4) 
} 

如果我使用

t <- apply(m, MARGIN = c(1,2), FUN = f) 

我會得到一個張t與dim(t) == c(4,2,3)。但我想要的是張量t與dim(t) == c(2,3,4)。我怎樣才能方便地做到這一點？謝謝。

Answer 1

使用aperm，廣義換位：

tt <- <- apply(m, MARGIN = c(1,2), FUN = f) 
aperm(tt, c(2,3,1)) 

在這裏看到：How to change order of array dimensions