expected_values[[runno]] <- list(lik = c(-11760.59, 23547.18, 23621.69), param = c(6.9639,
5.6592, 4.2329, 1.4173, 3.9556, -0.026296, 0.20153), stdev_param = c(0.33657,
0.23478, 0.23155, 0.34558, 0.34331, 0.28362, NA), sigma = c(prop.err = 0.20153),
parFixedDf = structure(list(Estimate = c(lVM = 6.96389108306234,
lKM = 5.65916871029466, lVc = 4.23291498791069, lQ = 1.41726598518236,
lVp = 3.95558901267197, lKA = -0.0262961068568439, prop.err = 0.20152513174658
), SE = c(lVM = 0.105811701805658, lKM = 0.154061861142949,
lVc = 0.0362301019035955, lQ = 0.073812528050789, lVp = 0.0502141670236056,
lKA = 0.0385823616402124, prop.err = NA), "%RSE" = c(1.51943361180669,
2.72234084244023, 0.855913761723767, 5.20809282255449, 1.26944854136113,
146.722713937294, NA), "Back-transformed" = c(1057.74131957022,
286.910038034078, 68.9178343092436, 4.1258249397343, 52.2264469256457,
0.974046625018132, 0.20152513174658), "CI Lower" = c(859.631628370735,
212.132909760288, 64.1937139931869, 3.57010886096793, 47.3312641952131,
0.903105277384328, NA), "CI Upper" = c(1301.50713654714,
388.046201872851, 73.989610359364, 4.76804268335907, 57.6279084206913,
1.05056060624198, NA), "BSV(CV%)" = c(23.4686221916682, 35.6157736397711,
34.6332268743367, 35.3676960910745, 23.8048031859044, 28.9424372910484,
NA), "Shrink(SD)%" = c(30.0554475638383, 33.5727327464405,
4.86392847091677, 50.6953602949345, 43.2741534707198, 20.8453685727823,
NA)), class = "data.frame", row.names = c("lVM", "lKM", "lVc",
"lQ", "lVp", "lKA", "prop.err")), omega = structure(c(0.113280505907937,
0, 0, 0, 0, 0, 0, 0.0551194873648768, 0, 0, 0, 0, 0, 0, 0.0536143402949278,
0, 0, 0, 0, 0, 0, 0.119424650310251, 0, 0, 0, 0, 0, 0, 0.117860715020651,
0, 0, 0, 0, 0, 0, 0.080442444046423), .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 = 15.2890000000002,
setup = 118.406159, table = 0.093000000000302, cwres = 118.522,
covariance = 0.0749999999998181, other = 0.310840999999868), class = "data.frame", row.names = "elapsed"),
objDf = structure(list(OBJF = 19330.8201069366, AIC = 23547.17981835,
BIC = 23621.6949177353, "Log-likelihood" = -11760.589909175,
"Condition Number" = 53.6906400874051), row.names = "FOCEi", class = "data.frame"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.