R/update.sbchoice.R

Defines functions update.sbchoice

Documented in update.sbchoice

update.sbchoice <- function(object, new, evaluate = TRUE, ...)
{
    call <- getCall(object)

    if (!missing(new)) {
        call$formula <- update(object$formula, new)
    }

    if (evaluate == TRUE) {
        eval(call, parent.frame())
    } else {
        call
    }
}

Try the DCchoice package in your browser

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

DCchoice documentation built on Aug. 8, 2021, 9:06 a.m.