abc = np.array(np.arange(2*3*4)).reshape((2,3,4)) abc print(abc.sum(0)) print(abc.sum(1)) print(abc.sum(2)) print(abc.sum(0).sum(0)) print(abc.sum(0).sum(1)) print(abc.sum(1).sum(0)) print(abc.sum(1).sum(1)) print(abc.sum(2).sum(0)) print(…

昨日の記事で、まず、アレイの形が変わらないような関数をapply()を使って実行したときの、アレイの形の変化を抑える話をするために、アレイの転置について書いた 今日は、それを応用して、arrayにapply()をかけて、アレイの形そのままに出す方法 これによっ…

転置する アレイの各軸の要素数を使った「任意digit進法」みたいなもの # Aはアレイ # vは、アレイの軸の順番の変更を指示する順列ベクトル my.t.array <- function(A,v){ # アレイをベクトル化する A.v <- c(A) # アレイの各要素の「番地」を作る p <- list…