R/sq.array.R

`sq.array` <- 
function(x) 
  array(x <- as.matrix(x), c(n<-sqrt(dim(x)[1]), n, dim(x)[2]))

Try the muStat package in your browser

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

muStat documentation built on May 2, 2019, 5:12 a.m.