R/tToV.R

Defines functions tToV

#' @export tToV
tToV <- function(x) {
  if(length(dim(x))!=1) {
    stop("Dimensionality>1")
  }
  return(as.matrix(x)[, 1])
}
jon-mellon/mellonMisc documentation built on July 4, 2022, 9:51 a.m.