inst/classic-bugs/vol1/epil/bench-test2.R

In nimble: MCMC, Particle Filtering, and Programmable Hierarchical Modeling

benchstats <-
structure(c(-1.37189672981, 0.8736528925, -0.9605229726, 0.355106918969, 
0.479617611166, -0.1013694932506, 0.499196704, 0.3629548375, 
1.24596963892823, 0.139269373665539, 0.42677791506752, 0.217604463793377, 
0.363695771040492, 0.0875368695485932, 0.0715217646809272, 0.044228441996263, 
0.0278607281054439, 0.00311415786699964, 0.00954304429386607, 
0.00486578373249383, 0.0081324846717574, 0.00195738390848186, 
0.00159927527697297, 0.000988978028425506, 0.0290481340303291, 
0.00321706133553644, 0.00999669190698694, 0.00526391236992741, 
0.00855921171217479, 0.00239996464569182, 0.00192372054467975, 
0.00145567919667494), .Dim = c(8L, 4L), .Dimnames = list(c("alpha0", 
"alpha.Base", "alpha.Trt", "alpha.BT", "alpha.Age", "alpha.V4", 
"sigma.b1", "sigma.b"), c("Mean", "SD", "Naive SE", "Time-series SE"
)))