関数への複数レベルの入力を指定できますprop.table
。ここで、1 = 行、2 = 列、3 = 層などです。
簡単な例:
test <- 1:8
dim(test) <- c(2,2,2)
test
, , 1
[,1] [,2]
[1,] 1 3
[2,] 2 4
, , 2
[,1] [,2]
[1,] 5 7
[2,] 6 8
次に、次のようなことができます。
# % of all values in each stratum/sub-table
prop.table(test,3)
# row % within each stratum/sub-table
prop.table(test,c(3,1))
# column % within each stratum/sub-table
prop.table(test,c(3,2))
を処理する簡単な方法があるかもしれませんNA
が、ラウンドアバウト バージョンは、それらを として設定し0
、次に としてリセットすることNA
です。
# set one of the values to NA as an example
test[7] <- NA
# do the procedure
nas <- is.na(test)
test[nas] <- 0
result <- prop.table(test,c(3,2))
result[nas] <- NA
result
, , 1
[,1] [,2]
[1,] 0.3333333 0.4285714
[2,] 0.6666667 0.5714286
, , 2
[,1] [,2]
[1,] 0.4545455 NA
[2,] 0.5454545 1