R/eow.R

In dbd: Discretised Beta Distribution

Defines functions get.eow set.eow

Documented in get.eow set.eow

set.eow <- function(eow=c("error","warn")) {
    eow <- match.arg(eow)
    options(maxitErrorOrWarn=eow)
    invisible()
}

get.eow <- function() {
    options()[["maxitErrorOrWarn"]]
}

Try the dbd package in your browser