我有一个关于索引3个暗淡数组的问题.
说我有一个三维数组
x<- c(1:36)
dim(x) <- c(3,4,3)
现在我想根据包含所有[i,j]位置的第三维索引的矩阵从该数组中提取值.
y <- c(rep(1,4),rep(2,4),rep(3,4))
dim(y) <- c(3,4)
y
[,1] [,2] [,3] [,4]
[1,] 1 1 2 3
[2,] 1 2 2 3
[3,] 1 2 3 3
所以结果应该是这样的:
[,1] [,2] [,3] [,4]
[1,] 1 4 19 34
[2,] 2 17 20 35
[3,] 3 18 33 36
有一些优雅的方式来做到这一点？我知道如何使用两个for循环遍历数组,但这对我的数据来说太慢了.