r - 申込時の「結束方法」の指定方法

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))

ここを参照してください：配列次元の順序を変更する方法