inst/classic-bugs/vol2/asia/bench-test1.R

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

"benchstats" <-
structure(c(1.631, 1.0903, 1.1, 1.8177, 1.1851, 1.2222, 0.482558065136853, 
0.286625409572392, 0.300015001125094, 0.386110888426908, 0.388398088702211, 
0.415745648737836, 0.00482558065136853, 0.00286625409572392, 
0.00300015001125094, 0.00386110888426908, 0.00388398088702211, 
0.00415745648737836, 0.00542034101330499, 0.00309836323629328, 
0.00343841891074397, 0.00454083072307805, 0.00427799153737893, 
0.00449885711522478), .Dim = as.integer(c(6, 4)), .Dimnames = list(
    c("smoking", "tuberculosis", "lung.cancer", "bronchitis", 
    "either", "xray"), c("Mean", "SD", "Naive SE", "Time-series SE"
    )))