R/arrMat.R

arrMat<-function(input){
  d<-dim(input)
  if(length(d)==3){mat <- matrix(input, nrow = 1, byrow = TRUE)}
  if(length(d)==4){mat <- matrix(input, nrow = d[4], byrow = TRUE)}
  return(mat)
}

Try the FIACH package in your browser

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

FIACH documentation built on May 1, 2019, 8:02 p.m.