expected_values[[runno]] <- list(lik = c(-27007.94, 54037.88, 54108.84), param = c(1.3404,
4.2459, 1.432, 3.7504, -0.070759, 0.19803), stdev_param = c(0.25682,
0.32047, 0.30592, 0.42608, 0.34253, NA), sigma = c(prop.err = 0.19803),
parFixedDf = structure(list(Estimate = c(lCl = 1.34042025410003,
lVc = 4.24585312760699, lQ = 1.43203156915636, lVp = 3.75039808704715,
lKA = -0.0707590118805398, prop.err = 0.198028120189339),
SE = c(lCl = 0.029771515662382, lVc = 0.0365222504535275,
lQ = 0.150730593252595, lVp = 0.0578551073199194, lKA = 0.0613071586014936,
prop.err = NA), "%RSE" = c(2.22105832639561, 0.860186383180707,
10.5256473739188, 1.54263910062601, 86.6421915345518,
NA), "Back-transformed" = c(3.82064881135226, 69.8152961009018,
4.18719713747452, 42.5380124617131, 0.93168639042695,
0.198028120189339), "CI Lower" = c(3.60408943757911,
64.9924319828359, 3.11617109492287, 37.9778904592702,
0.826199644143774, NA), "CI Upper" = c(4.05022061536092,
74.9960483236545, 5.62633415624721, 47.6456823249164,
1.05064137495046, NA), "BSV(CV%)" = c(32.8872458550983,
26.1114367061889, 44.616660353817, 31.3223788005692,
35.2827871533371, NA), "Shrink(SD)%" = c(1.14790474259585,
13.21694227932, 47.6175422585718, 26.9021211981402, 21.9394389171954,
NA)), class = "data.frame", row.names = c("lCl", "lVc",
"lQ", "lVp", "lKA", "prop.err")), omega = structure(c(0.0659569328591293,
0, 0, 0, 0, 0, 0.102698359857496, 0, 0, 0, 0, 0, 0.093589738304697,
0, 0, 0, 0, 0, 0.181541784611289, 0, 0, 0, 0, 0, 0.117327382467363
), .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 = 0.17228500000147,
optimize = 542.365018, covariance = 542.36502, table = 0.419000000001688,
other = 788.026676999995), class = "data.frame", row.names = "elapsed"),
objDf = structure(list(OBJF = 45414.6169145569, AIC = 54037.8815853526,
BIC = 54108.8431726306, "Log-likelihood" = -27007.9407926763,
"Condition Number" = 42.7106488728573), row.names = "FOCEi", class = "data.frame"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.