R/permnew.R

permnew <-
function(X,n,m,p){

X=as.matrix(X)
Y=t(X)		
y=as.vector(Y)		
Y=matrix(0,m,n*p)
Y=matrix(y,nrow(Y),ncol(Y))
return(Y)
}

Try the ThreeWay package in your browser

Any scripts or data that you put into this service are public.

ThreeWay documentation built on May 2, 2019, 9:20 a.m.