powered by
Intercept-only model with no error correlation.
opsr_null_model(object, ...)
An object of class "opsr.null" "opsr".
"opsr.null" "opsr"
an object of class "opsr".
"opsr"
further arguments passed to opsr.
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)
Run the code above in your browser using DataLab