楼主解决没有  ?   我现在也碰到这个问题

谢谢楼主分享

首先建立一个三维数据：
以下为例
X<-array(0,dim<-c(2,3,4))#现在相当于建立了2个3*4维数的矩阵 然后再对矩阵赋值 你之前赋值不行是因为没有事先给矩阵们布置好储存空间
for(i in 1:2)
{
        for(j in 1:3)
        {
                for(k in 1:4)
                {
                        X[i,j,k]<-(i+j+k)
                }
        }
}
结果展示：
> X[1,,]
     [,1] [,2] [,3] [,4]
[1,]    3    4    5    6
[2,]    4    5    6    7
[3,]    5    6    7    8
> X[2,,]
     [,1] [,2] [,3] [,4]
[1,]    4    5    6    7
[2,]    5    6    7    8
[3,]    6    7    8    9
>

太有用了！感谢分享！！！