Null Model for OPSR Model fits
Intercept-only model with no error correlation.
opsr_null_model(object, ...)
object
: an object of class "opsr"
....
: further arguments passed to opsr
.An object of class "opsr.null" "opsr"
.
sim_dat <- opsr_simulate() dat <- sim_dat$data model <- ys | yo ~ xs1 + xs2 | xo1 + xo2 fit <- opsr(model, dat) fit_null <- opsr_null_model(fit) summary(fit_null)