R/as.all.R

In prada: Data analysis for cell-based functional assays

Defines functions as.all

Documented in as.all

as.all = function(x, what) {
  na = is.na(x)
  x  = do.call(paste("as.", what, sep=""), list(x))
  if(any(is.na(x)!=na))
    stop("Non-numeric values were produced in as.all")
  return(x)
}

Try the prada package in your browser