Prepares Coefficients for Likelihood Function
Extracts the coefficients for each regime
opsr_prepare_coefs(theta, nReg)
theta
: named coefficient vector as parsed from formula interface opsr
.nReg
: integer number of regimes.Named list of length nReg
sim_dat <- opsr_simulate() dat <- sim_dat$data model <- ys | yo ~ xs1 + xs2 | xo1 + xo2 start <- opsr(model, dat, .get2step = TRUE) opsr_prepare_coefs(start, 3)