expected_values[[runno]] <- list(lik = c(-12614.33, 25250.65, 25313.7), param = c(7.1376,
5.8044, 4.2589, 1.352, 3.8408, 0.19957), stdev_param = c(0.2987,
0.33689, 0.2968, 0.28396, 0.33076, NA), sigma = c(prop.err = 0.19957),
parFixedDf = structure(list(Estimate = c(lVM = 7.13762495951976,
lKM = 5.80441167072641, lVc = 4.25889212515145, lQ = 1.35204526702418,
lVp = 3.84078474315102, prop.err = 0.199565427133238), SE = c(lVM = 0.138075434164303,
lKM = 0.211435424141223, lVc = 0.0282715662624227, lQ = 0.0581697749533344,
lVp = 0.0651556803760952, prop.err = NA), "%RSE" = c(1.93447309080236,
3.6426676144899, 0.663824427377751, 4.30235409805212, 1.69641582992336,
NA), "Back-transformed" = c(1258.43600053988, 331.759951824565,
70.731578294153, 3.86532306946791, 46.5619993166528, 0.199565427133238
), "CI Lower" = c(960.066047340174, 219.204668851854, 66.9188621938029,
3.44882848263959, 40.9799103938412, NA), "CI Upper" = c(1649.53356265674,
502.109130298785, 74.7615246878061, 4.33211524045575, 52.9044539026079,
NA), "BSV(CV%)" = c(30.5485769929236, 34.6673512221812, 30.3462697498927,
28.9777689466631, 34.0013171942762, NA), "Shrink(SD)%" = c(23.0465974687885,
44.5133604032525, 1.77465194110932, 51.7709241126254, 30.0520111805559,
NA)), class = "data.frame", row.names = c("lVM", "lKM", "lVc",
"lQ", "lVp", "prop.err")), omega = structure(c(0.0892203613796082,
0, 0, 0, 0, 0, 0.113491639954358, 0, 0, 0, 0, 0, 0.0880929332722639,
0, 0, 0, 0, 0, 0.0806312507366574, 0, 0, 0, 0, 0, 0.109400405687134
), .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 = 0.157146000001455,
optimize = 39.572171, covariance = 39.572172, table = 0.108999999998559,
other = 102.502511), class = "data.frame", row.names = "elapsed"),
objDf = structure(list(OBJF = 21038.2905782327, AIC = 25250.650289646,
BIC = 25313.7015275875, "Log-likelihood" = -12614.325144823,
"Condition Number" = 88.127251544558), row.names = "FOCEi", class = "data.frame"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.