expected_values[[runno]] <- list(lik = c(-13220.26, 26462.53, 26525.58), param = c(1.3678,
4.2432, 1.4325, 3.8898, -0.10105, 0.19383), stdev_param = c(0.27846,
0.30854, 0.30566, 0.38884, 0.38706, NA), sigma = c(prop.err = 0.19383),
parFixedDf = structure(list(Estimate = c(lCl = 1.36779933172621,
lVc = 4.24320161508403, lQ = 1.43254604605978, lVp = 3.88977243963661,
lKA = -0.10104724538881, prop.err = 0.193825312099973), SE = c(lCl = 0.0284882105795672,
lVc = 0.035144063536492, lQ = 0.112369023741436, lVp = 0.0531613954043199,
lKA = 0.0606726949176925, prop.err = NA), "%RSE" = c(2.08277705060831,
0.828244017714347, 7.84400781046497, 1.36669679857381, 60.0438880686317,
NA), "Back-transformed" = c(3.92669981639757, 69.6304251711004,
4.18935190793411, 48.8997576109184, 0.903890327227098, 0.193825312099973
), "CI Lower" = c(3.7134578032901, 64.9956611599395, 3.3612294223147,
44.06113138289, 0.802548056507496, NA), "CI Upper" = c(4.15218706253661,
74.5956887426286, 5.22150296912043, 54.2697434077947, 1.01802965819914,
NA), "BSV(CV%)" = c(31.6029796928397, 28.3946199413375, 40.4007475404474,
31.2943274534015, 40.2015746533872, NA), "Shrink(SD)%" = c(1.08195571770131,
16.5578955050569, 59.4317188094907, 32.9388301759177, 28.0458665109146,
NA)), class = "data.frame", row.names = c("lCl", "lVc", "lQ",
"lVp", "lKA", "prop.err")), omega = structure(c(0.077539988477936,
0, 0, 0, 0, 0, 0.0951963847359155, 0, 0, 0, 0, 0, 0.0934297702838744,
0, 0, 0, 0, 0, 0.151193775505071, 0, 0, 0, 0, 0, 0.149812707669068
), .Dim = c(5L, 5L), .Dimnames = list(c("eta.Vc", "eta.Cl",
"eta.Vp", "eta.Q", "eta.KA"), c("eta.Vc", "eta.Cl", "eta.Vp",
"eta.Q", "eta.KA"))), time = structure(list(setup = 109.805472,
optimize = 562.639265, covariance = 562.639266, table = 0.297999999999774,
other = 526.505997), class = "data.frame", row.names = "elapsed"),
objDf = structure(list(OBJF = 22250.1701086322, AIC = 26462.5298200455,
BIC = 26525.581057987, "Log-likelihood" = -13220.2649100228,
"Condition Number" = 19.6433467426127), row.names = "FOCEi", class = "data.frame"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.