search for: tp22835003p22835003

...... id_y <- array(1:10,dim=c(2,1,5)) id_yt<-aperm(id_y,c(2,1,3)) m_id<-array(dim=c(dim(id_y)[1],dim(id_y)[1],dim(id_y)[3])) for (i in 1:dim(id_y)[3]){ m_id[,,i]<-id_y[,,i]%*%id_yt[,,i] } m_id -- View this message in context: http://www.nabble.com/Matrix-multiplication---code-problem-tp22835003p22835003.html Sent from the R help mailing list archive at Nabble.com.