expected_values[[runno]] <- list(lik = c(-29741.08, 59508.15, 59592.01), param = c(7.0052,
6.0857, 4.3254, 0.36747, 3.8608, 0.049123, 0.20169), stdev_param = c(0.29722,
0.23594, 0.30145, 0.44773, 0.56582, 0.38099, NA), sigma = c(prop.err = 0.20169),
parFixedDf = structure(list(Estimate = c(lVM = 7.00522228946535,
lKM = 6.08573195889343, lVc = 4.32540085493481, lQ = 0.367467338294288,
lVp = 3.86079340972767, lKA = 0.0491234821148937, prop.err = 0.201687048999435
), SE = c(lVM = 0.0777618392356686, lKM = 0.128691185787896,
lVc = 0.0348623398337862, lQ = 0.109650686461686, lVp = 0.06804573465131,
lKA = 0.0598412980272789, prop.err = NA), "%RSE" = c(1.11005527051738,
2.1146377569231, 0.805990959057866, 29.8395734898951, 1.76248059478815,
121.818111117037, NA), "Back-transformed" = c(1102.37507414245,
439.541421208895, 75.5958097403793, 1.44407263188395, 47.5030257840044,
1.05035004217716, 0.201687048999435), "CI Lower" = c(946.538726406681,
341.55266015325, 70.6029497257079, 1.16480762188093, 41.5719732602065,
0.934107914939918, NA), "CI Upper" = c(1283.86802376688,
565.642384022571, 80.9417520444304, 1.79029199928211, 54.2802585894038,
1.18105755604536, NA), "BSV(CV%)" = c(30.8429003399167, 47.1131384301845,
30.3911075165761, 61.4276957622112, 23.9266041114535, 39.5242668256259,
NA), "Shrink(SD)%" = c(24.3774862122957, 40.6909156927052,
9.08580849572678, 45.8636029795674, 56.4421686417677, 37.3837779707764,
NA)), class = "data.frame", row.names = c("lVM", "lKM", "lVc",
"lQ", "lVp", "lKA", "prop.err")), omega = structure(c(0.0883422707651889,
0, 0, 0, 0, 0, 0, 0.0556695311885314, 0, 0, 0, 0, 0, 0, 0.0908716624505672,
0, 0, 0, 0, 0, 0, 0.20046003977285, 0, 0, 0, 0, 0, 0, 0.32015132986605,
0, 0, 0, 0, 0, 0, 0.145153267213337), .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(saem = 453.895, setup = 0.222346999999847,
table = 0.365999999999985, cwres = 0.668999999999869,
covariance = 0.193000000000211, other = 0.413653000000124), class = "data.frame", row.names = "elapsed"),
objDf = structure(list(OBJF = 50880.8863259268, AIC = 59508.1509967225,
BIC = 59592.0146907784, "Log-likelihood" = -29741.0754983613,
"Condition Number" = 30.922380457804), row.names = "FOCEi", class = "data.frame"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.