expected_values[[runno]] <- list(lik = c(-11987.5, 23997.01, 24060.06), param = c(6.804,
5.2924, 4.2586, 1.3754, 3.9184, 0.19297), stdev_param = c(0.31887,
0.17378, 0.28761, 0.3504, 0.32003, NA), sigma = c(prop.err = 0.19297),
parFixedDf = structure(list(Estimate = c(lVM = 6.80400988107579,
lKM = 5.29240896501184, lVc = 4.25856502916806, lQ = 1.37541172651271,
lVp = 3.91840162157974, prop.err = 0.192970286609141), SE = c(lVM = 0.096139067824416,
lKM = 0.144487720489721, lVc = 0.0275993088023539, lQ = 0.0602364585576807,
lVp = 0.0592503241478771, prop.err = NA), "%RSE" = c(1.41297660504302,
2.73009363873674, 0.648089406016318, 4.37952195670219, 1.51210442088348,
NA), "Back-transformed" = c(901.454780480974, 198.821803748521,
70.7084460624305, 3.95670546814298, 50.3199501423425, 0.192970286609141
), "CI Lower" = c(746.638229998788, 149.78759191489, 66.9851784608907,
3.51609302531005, 44.8029112324834, NA), "CI Upper" = c(1088.37277358985,
263.90777193532, 74.6386657383128, 4.45253241280555, 56.5163582604871,
NA), "BSV(CV%)" = c(32.7149629442364, 17.5096268049668, 29.365713608993,
36.143839977695, 32.8404357789148, NA), "Shrink(SD)%" = c(10.7719007594266,
68.7957272970492, 2.78416946420764, 40.5650911169808, 27.5754509009757,
NA)), class = "data.frame", row.names = c("lVM", "lKM", "lVc",
"lQ", "lVp", "prop.err")), omega = structure(c(0.101677935314514,
0, 0, 0, 0, 0, 0.0301981153955088, 0, 0, 0, 0, 0, 0.0827171407193479,
0, 0, 0, 0, 0, 0.122781824717942, 0, 0, 0, 0, 0, 0.102420678561712
), .Dim = c(5L, 5L), .Dimnames = list(c("eta.VM", "eta.KM",
"eta.Vc", "eta.Q", "eta.Vp"), c("eta.VM", "eta.KM", "eta.Vc",
"eta.Q", "eta.Vp"))), time = structure(list(setup = 9.54087300000127,
optimize = 28.103878, covariance = 28.10388, table = 0.0980000000017753,
other = 124.291368999996), class = "data.frame", row.names = "elapsed"),
objDf = structure(list(OBJF = 19784.6478655986, AIC = 23997.0075770119,
BIC = 24060.0588149534, "Log-likelihood" = -11987.503788506,
"Condition Number" = 45.788998280252), row.names = "FOCEi", class = "data.frame"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.