R/argcheck.R

Defines functions argcheck

argcheck = function(argvals) {

#  check ARGVALS

  if (!is.numeric(argvals)) stop("ARGVALS is not numeric.")

  argvals <- as.vector(argvals)

  if (length(argvals) < 2) stop("ARGVALS does not contain at least two values.")

  return(argvals)

}

Try the fda package in your browser

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

fda documentation built on May 2, 2019, 5:12 p.m.