inst/classic-bugs/vol2/beetles/bench-test2.R

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

"benchstats" <-
structure(c(-35.0322739999999, 19.7829772200000, 3.45172774899999, 
10.7754888360000, 23.49701935, 33.8250644899999, 49.6052494599999, 
53.2716275399999, 59.59629864, 59.17209818, 12.17671907, 2.6855082790894, 
1.51007650357779, 1.03382692007088, 1.71769531671330, 1.92984180268822, 
1.62283046083579, 1.64392797177776, 1.17211341908207, 0.758046388738116, 
0.375746808139564, 2.06610796741812, 0.026855082790894, 0.0151007650357779, 
0.0103382692007088, 0.0171769531671330, 0.0192984180268822, 0.0162283046083579, 
0.0164392797177776, 0.0117211341908207, 0.00758046388738116, 
0.00375746808139564, 0.0206610796741812, 0.0373652596646522, 
0.0211596370406421, 0.0125155107986183, 0.0198349385902978, 0.0220313848636478, 
0.0209184629795335, 0.0238589026867199, 0.0176389511831437, 0.0114204675766235, 
0.00562094569702396, 0.0316088575435682), .Dim = as.integer(c(11, 
4)), .Dimnames = list(c("alpha", "beta", "r.hat[1]", "r.hat[2]", 
"r.hat[3]", "r.hat[4]", "r.hat[5]", "r.hat[6]", "r.hat[7]", "r.hat[8]", 
"D"), c("Mean", "SD", "Naive SE", "Time-series SE")))