R/addClass.R

Defines functions addClass

## don't export

addClass <- function(data,class){
    allclasses <- class(data)
    if(!class %in% allclasses) allclasses <- c(class,allclasses)
    setattr(data,"class",allclasses)
}

Try the NMsim package in your browser

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

NMsim documentation built on Nov. 2, 2024, 9:06 a.m.