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

"benchstats" <-
structure(c(33.71560698, 1.8654600618, 6.71268045699999, 6.50401997400003, 
6.069309071, 5.83057358199998, 6.50401997400003, 6.81616501199998, 
6.45828550899999, 6.22641853500001, 6.069309071, 6.45828550899999, 
7.28058129400001, 7.262238056, 5.83057358199998, 6.22641853500001, 
7.262238056, 7.85104464599998, 48.6392875499998, 49.57201765, 
50.5047482600001, 51.4374778599999, 542.009024800001, 89.2057540300001, 
1.94842245805492, 0.219688430577894, 2.37204067245531, 2.36048997210519, 
2.32920395807048, 2.33180855506308, 2.36048997210519, 2.43717604812462, 
2.41964792486727, 2.42099251621225, 2.32920395807048, 2.41964792486727, 
2.59797370870141, 2.6353581701467, 2.33180855506308, 2.42099251621225, 
2.6353581701467, 2.77954970685420, 0.562761110188605, 0.551669568604948, 
0.562236738043623, 0.593306946189795, 40.2906186112995, 4.77806251023037, 
0.0194842245805492, 0.00219688430577894, 0.0237204067245531, 
0.0236048997210519, 0.0232920395807048, 0.0233180855506308, 0.0236048997210519, 
0.0243717604812462, 0.0241964792486727, 0.0242099251621225, 0.0232920395807048, 
0.0241964792486727, 0.0259797370870141, 0.0263535817014670, 0.0233180855506308, 
0.0242099251621225, 0.0263535817014670, 0.0277954970685419, 0.00562761110188605, 
0.00551669568604948, 0.00562236738043622, 0.00593306946189795, 
0.402906186112995, 0.0477806251023037, 0.0270011575624601, 0.00313540690551144, 
0.0264337288908911, 0.0265668021365479, 0.0264823080806883, 0.0265912337924997, 
0.0265668021365479, 0.0273689729767646, 0.0273337745720587, 0.0274345597630697, 
0.0264823080806883, 0.0273337745720587, 0.0290907355727127, 0.0295183469994574, 
0.0265912337924997, 0.0274345597630697, 0.0295183469994574, 0.0309975954917966, 
0.00802250645549126, 0.00804699278811514, 0.00837682037111362, 
0.00897566652800509, 0.734122228553395, 0.0553602241769378), .Dim = as.integer(c(24, 
4)), .Dimnames = list(c("beta0.uncentred", "beta1", "Sigma2[1,1]", 
"Sigma2[2,1]", "Sigma2[3,1]", "Sigma2[4,1]", "Sigma2[1,2]", "Sigma2[2,2]", 
"Sigma2[3,2]", "Sigma2[4,2]", "Sigma2[1,3]", "Sigma2[2,3]", "Sigma2[3,3]", 
"Sigma2[4,3]", "Sigma2[1,4]", "Sigma2[2,4]", "Sigma2[3,4]", "Sigma2[4,4]", 
"mu[1]", "mu[2]", "mu[3]", "mu[4]", "RSS", "deviance"), c("Mean", 
"SD", "Naive SE", "Time-series SE")))

Try the nimble package in your browser

Any scripts or data that you put into this service are public.

nimble documentation built on Sept. 11, 2024, 7:10 p.m.