inst/classic-bugs/vol1/litters/bench-test1.R

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

"benchstats" <-
structure(c(0.891243006, 0.737389322000001, 0.5084999256, 0.03645964932, 
0.0269115255558972, 0.0668219976795681, 0.264693285356259, 0.0219835258078707, 
0.000851017160664642, 0.00211309710469921, 0.0083703366307867, 
0.000695180125539647, 0.000908849326318978, 0.00203101794954179, 
0.0103579879291921, 0.000679619774988638), .Dim = as.integer(c(4, 
4)), .Dimnames = list(c("mu[1]", "mu[2]", "theta[1]", "theta[2]"
), c("Mean", "SD", "Naive SE", "Time-series SE")))