expected_values[[runno]] <- list(lik = c(-29731.96, 59489.93, 59573.79), param = c(7.1115,
6.2221, 4.3459, 0.36066, 3.7175, 0.077489, 0.20136), stdev_param = c(0.30161,
0.28783, 0.26007, 0.49724, 0.60684, 0.35526, NA), sigma = c(prop.err = 0.20136),
parFixedDf = structure(list(Estimate = c(lVM = 7.1114849433786,
lKM = 6.2220731644239, lVc = 4.34585575900398, lQ = 0.360659962702428,
lVp = 3.71750425814202, lKA = 0.0774885342308057, prop.err = 0.201359544705032
), SE = c(lVM = 0.0686828894379189, lKM = 0.126398080565292,
lVc = 0.0350903861229902, lQ = 0.106227817818116, lVp = 0.0665781328118515,
lKA = 0.0601337604524033, prop.err = NA), "%RSE" = c(0.965802360333597,
2.03144638812673, 0.807444794970199, 29.4537317150898, 1.79093628920621,
77.6034300420371, NA), "Back-transformed" = c(1225.96668621049,
503.746499535527, 77.1580379207183, 1.43427567072679, 41.1615372384768,
1.08056984282312, 0.201359544705032), "CI Lower" = c(1071.55801130791,
393.207506467231, 72.0297959463609, 1.16469268861424, 36.1260248533418,
0.960432600490152, NA), "CI Upper" = c(1402.62524271871,
645.360354572591, 82.6513908245463, 1.76625707343143, 46.8989365620109,
1.21573464355841, NA), "BSV(CV%)" = c(26.4526498798601, 52.9623702320417,
30.8597956474464, 66.7234742659536, 29.3896193250286, 36.6774383979889,
NA), "Shrink(SD)%" = c(33.5801594607393, 35.877361170654,
8.23864197710755, 44.7911876665513, 54.5042263018486, 37.9612166737283,
NA)), class = "data.frame", row.names = c("lVM", "lKM", "lVc",
"lQ", "lVp", "lKA", "prop.err")), omega = structure(c(0.0909668509563928,
0, 0, 0, 0, 0, 0, 0.0828464403763469, 0, 0, 0, 0, 0, 0, 0.0676346001161008,
0, 0, 0, 0, 0, 0, 0.247251615379786, 0, 0, 0, 0, 0, 0, 0.368249243824603,
0, 0, 0, 0, 0, 0, 0.126212693815549), .Dim = c(6L, 6L), .Dimnames = list(
c("eta.Vc", "eta.Vp", "eta.VM", "eta.KM", "eta.Q", "eta.KA"
), c("eta.Vc", "eta.Vp", "eta.VM", "eta.KM", "eta.Q",
"eta.KA"))), time = structure(list(setup = 13.786331,
optimize = 887.244628, covariance = 887.244629, table = 0.398999999999432,
other = 7035.366412), class = "data.frame", row.names = "elapsed"),
objDf = structure(list(OBJF = 50862.6642374567, AIC = 59489.9289082524,
BIC = 59573.7926023082, "Log-likelihood" = -29731.9644541262,
"Condition Number" = 29.5118984745935), row.names = "FOCEi", class = "data.frame"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.