R/check.class.R

check.class <-
function(var, class){

    varname <- deparse(substitute(var))
     if(!inherits(var, class)) stop(varname, " must be of class ", class)

}

Try the CMRCT package in your browser

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

CMRCT documentation built on May 2, 2019, 6:44 p.m.