From: <snt...@us...> - 2010-10-02 13:00:56
|
Revision: 175 http://bugs-r.svn.sourceforge.net/bugs-r/?rev=175&view=rev Author: snthomas99 Date: 2010-10-02 13:00:50 +0000 (Sat, 02 Oct 2010) Log Message: ----------- trying validation code commit again Added Paths: ----------- trunk/R2OpenBUGS/inst/validateInstallOpenBUGS/ trunk/R2OpenBUGS/inst/validateInstallOpenBUGS/validOpenBUGSResults.R Added: trunk/R2OpenBUGS/inst/validateInstallOpenBUGS/validOpenBUGSResults.R =================================================================== --- trunk/R2OpenBUGS/inst/validateInstallOpenBUGS/validOpenBUGSResults.R (rev 0) +++ trunk/R2OpenBUGS/inst/validateInstallOpenBUGS/validOpenBUGSResults.R 2010-10-02 13:00:50 UTC (rev 175) @@ -0,0 +1,135 @@ +list(structure(c(13.475, 27.37549, 40.81623, -0.84648, 0.0435, +8.69959, 7.45923, 8.83783, 3.01268, 0.11018, -3.781, 12.88, 23.37975, +-4.50322, -0.0263, 7.569, 22.42, 34.89, -1.27, 0.02274, 13.51, +27.27, 40.84, -0.6692, 0.03729, 19.4, 32.22, 46.75, -0.281, 0.05947, +30.5305, 42.32, 58.19, 0.86515, 0.1835), .Dim = c(5L, 7L), .Dimnames = list( + c("X[1]", "X[2]", "X[3]", "theta[1]", "theta[2]"), c("mean", + "sd", "2.5%", "25%", "50%", "75%", "97.5%"))), structure(c(1.80567, +1.1796, 1.09627, 0.3957, 0.38387, 0.29497, 1, 1, 1, 2, 1, 1, +2, 1, 1, 2, 1, 1, 2, 2, 2), .Dim = c(3L, 7L), .Dimnames = list( + c("bronchitis", "either", "lung.cancer"), c("mean", "sd", + "2.5%", "25%", "50%", "75%", "97.5%"))), structure(c(-60.84128, +34.34082, 3.55968, 9.9372, 22.49228, 33.89956, 50.05576, 53.22377, +59.15038, 58.68728, 5.20131, 2.92457, 0.95333, 1.67812, 2.08476, +1.75341, 1.66439, 1.11958, 0.74766, 0.43332, -71.28075, 28.74975, +1.982, 6.919, 18.45, 30.43, 46.68, 50.84, 57.49, 57.69, -64.33, +32.3375, 2.881, 8.758, 21.04, 32.71, 48.95, 52.5, 58.69, 58.44, +-60.71, 34.27, 3.46, 9.849, 22.47, 33.91, 50.1, 53.31, 59.23, +58.74, -57.28, 36.3125, 4.132, 11.02, 23.92, 35.09, 51.21, 54.01, +59.6825, 59, -50.92, 40.26025, 5.69105, 13.43025, 26.64, 37.26, +53.13, 55.19025, 60.39, 59.36), .Dim = c(10L, 7L), .Dimnames = list( + c("alpha", "beta", "rhat[1]", "rhat[2]", "rhat[3]", "rhat[4]", + "rhat[5]", "rhat[6]", "rhat[7]", "rhat[8]"), c("mean", "sd", + "2.5%", "25%", "50%", "75%", "97.5%"))), structure(c(106.56037, +6.18615, 6.15259, 2.34291, 0.10596, 0.47872, 101.9, 5.977, 5.304, +105, 6.117, 5.817, 106.5, 6.187, 6.1185, 108.1, 6.255, 6.452, +111.1025, 6.397, 7.177), .Dim = c(3L, 7L), .Dimnames = list(c("mu.beta[1]", +"mu.beta[2]", "sigma"), c("mean", "sd", "2.5%", "25%", "50%", +"75%", "97.5%"))), structure(c(3.2445, 0.02929, 0.02929, 3.20989, +0.0081, 0.85113, -0.00963, -0.00963, 0.86281, 2.1011, 2.50802, +2.50802, 2.13451, 0.65922, 0.50825, 0.71045, 0.71045, 0.50962, +1.14395, -4.77203, -4.77203, 1.101, -0.9073, 0.22139, -1.40502, +-1.40502, 0.2234, 1.926, -1.638, -1.638, 1.917, -0.66862, 0.49587, +-0.48102, -0.48102, 0.50065, 2.6875, 0.04017, 0.04017, 2.663, +0.01868, 0.7305, -0.00773, -0.00773, 0.74375, 3.89225, 1.715, +1.715, 3.82125, 0.68585, 1.07, 0.4545, 0.4545, 1.10125, 8.5671, +4.82202, 4.82202, 8.5781, 0.9098, 2.13205, 1.40205, 1.40205, +2.18202), .Dim = c(9L, 7L), .Dimnames = list(c("Sigma2[1,1]", +"Sigma2[1,2]", "Sigma2[2,1]", "Sigma2[2,2]", "rho", "tau[1,1]", +"tau[1,2]", "tau[2,1]", "tau[2,2]"), c("mean", "sd", "2.5%", +"25%", "50%", "75%", "97.5%"))), structure(c(1.85767, 2.64973, +0.96989, 0.86209, 0.09887, 0.26392, 0.07107, 0.07684, 0.03153, +0.0148, 1.323, 2.528, 0.8224, 0.7898, 0.07502, 1.701, 2.604, +0.9188, 0.8457, 0.08841, 1.854, 2.642, 0.9689, 0.8646, 0.09723, +2.026, 2.691, 1.018, 0.8836, 0.1074, 2.36802, 2.802, 1.122, 0.9144, +0.1326), .Dim = c(5L, 7L), .Dimnames = list(c("U3", "alpha", +"beta", "gamma", "sigma"), c("mean", "sd", "2.5%", "25%", "50%", +"75%", "97.5%"))), structure(c(2399.81116, 2970.23731, 1526.76347, +9152.71052, 1072.50035, 22.42927, 0.01173, 1559, 1483, 573.04999, +2217, 1515, 1388.49991, 2748, 1526, 2769.24997, 3466, 1539, 10140.49952, +5596.37451, 1570), .Dim = c(3L, 7L), .Dimnames = list(c("sigma2.btw", +"sigma2.with", "theta"), c("mean", "sd", "2.5%", "25%", "50%", +"75%", "97.5%"))), structure(c(0.99767, 1.43476, -0.00865, -0.1804, +0.11034, 0.1406, 0.99274, 0.04825, 0.0552, 0.05217, 0.05175, +0.03333, 0.05436, 0.05185, 1, 1.327, -0.113, -0.2831, 0.06521, +0.04439, 0.8931, 1, 1.4, -0.04039, -0.2121, 0.08657, 0.1057, +0.9604, 1, 1.435, -0.00813, -0.1808, 0.1033, 0.1356, 0.9919, +1, 1.469, 0.02322, -0.1495, 0.12722, 0.169, 1.023, 1, 1.544, +0.0942, -0.07637, 0.1929, 0.2663, 1.099), .Dim = c(7L, 7L), .Dimnames = list( + c("equiv", "mu", "phi", "pi", "sigma1", "sigma2", "theta" + ), c("mean", "sd", "2.5%", "25%", "50%", "75%", "97.5%"))), + structure(c(0.6029, 0.3971, 536.75923, 548.90934, 3.75937, + 0.08421, 0.08421, 0.92221, 1.21365, 0.6111, 0.4326, 0.2359, + 535.1, 546.5, 2.917, 0.54737, 0.34, 536.2, 548.2, 3.36175, + 0.6039, 0.3961, 536.7, 548.9, 3.654, 0.66, 0.45262, 537.3, + 549.7, 4.019, 0.7641, 0.5674, 538.6, 551.2, 5.27107), .Dim = c(5L, + 7L), .Dimnames = list(c("P[1]", "P[2]", "lambda[1]", "lambda[2]", + "sigma"), c("mean", "sd", "2.5%", "25%", "50%", "75%", "97.5%" + ))), structure(c(2.99564, 0.79689, 1.02513, 0.56926, 0.39621, + 0.72729, 1.914, 0.04475, 0.4099, 2.743, 0.6218, 0.625, 2.997, + 0.7995, 0.82675, 3.255, 0.9782, 1.16825, 4.08502, 1.541, + 2.82), .Dim = c(3L, 7L), .Dimnames = list(c("alpha", "beta", + "sigma"), c("mean", "sd", "2.5%", "25%", "50%", "75%", "97.5%" + ))), structure(c(5.26374, 2.19866, -5.88024, 0.25869, 0.27042, + 0.2265, 7.82296, 0.1335, 0.16648, 0.14127, 0.11614, 0.137, + 0.1076, 1.18539, 4.996, 1.87997, -6.165, 0.1277, 0.1201, + 0.1085, 5.90897, 5.187, 2.094, -5.964, 0.1849, 0.1843, 0.1586, + 6.984, 5.264, 2.197, -5.879, 0.2318, 0.24, 0.2008, 7.684, + 5.342, 2.3, -5.795, 0.2995, 0.3184, 0.26312, 8.521, 5.529, + 2.535, -5.603, 0.54651, 0.6038, 0.495, 10.5), .Dim = c(7L, + 7L), .Dimnames = list(c("mu[1]", "mu[2]", "mu[3]", "sigma[1]", + "sigma[2]", "sigma[3]", "sigmaC"), c("mean", "sd", "2.5%", + "25%", "50%", "75%", "97.5%"))), structure(c(106.61227, 6.18568, + 6.0953, 3.63673, 0.1075, 0.46858, 99.40975, 5.97597, 5.27197, + 104.2, 6.114, 5.776, 106.6, 6.187, 6.058, 109.1, 6.258, 6.386, + 113.6, 6.394, 7.106), .Dim = c(3L, 7L), .Dimnames = list( + c("alpha0", "beta.c", "sigma"), c("mean", "sd", "2.5%", + "25%", "50%", "75%", "97.5%"))), structure(c(0.71462, + 1.2978, -0.15277, -39.85965, 0.0106, 0.05567, 0.3192, 0.0106, + 0.05567, 0.3192, 0.0106, 0.05567, 0.3192, 3.38943, 0.14307, + 0.38863, 0.16594, 12.71407, 0.10241, 0.22928, 0.46618, 0.10241, + 0.22928, 0.46618, 0.10241, 0.22928, 0.46618, 0.62795, 0.43279, + 0.529, -0.4842, -65.22025, 0, 0, 0, 0, 0, 0, 0, 0, 0, 2.417, + 0.62217, 1.049, -0.26012, -48.11, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 2.945, 0.7155, 1.294, -0.15245, -39.96, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 3.299, 0.8063, 1.545, -0.04546, -31.5775, 0, + 0, 1, 0, 0, 1, 0, 0, 1, 3.742, 0.9984, 2.076, 0.1763, -14.38925, + 0, 1, 1, 0, 1, 1, 0, 1, 1, 4.84702), .Dim = c(14L, 7L), .Dimnames = list( + c("b[1]", "b[2]", "b[3]", "b0", "outlier[3]", "outlier[4]", + "outlier[21]", "outlier[3]", "outlier[4]", "outlier[21]", + "outlier[3]", "outlier[4]", "outlier[21]", "sigma"), + c("mean", "sd", "2.5%", "25%", "50%", "75%", "97.5%"))), + structure(c(0.02054, 0.12633, 0.07461, 0.05794, 0.04233, + 0.07062, 0.06659, 0.14758, 0.07197, 0.09058, 0.11631, 0.06903, + 0.01981, 0.0272, 0.02389, 0.00813, 0.01381, 0.01821, 0.02022, + 0.02414, 0.01787, 0.02864, 0.01984, 0.01339, 0.00053, 0.07787, + 0.03467, 0.04313, 0.01952, 0.03927, 0.03268, 0.1034, 0.04114, + 0.0432, 0.08016, 0.04533, 0.00614, 0.107, 0.0575, 0.05223, + 0.03235, 0.05768, 0.05224, 0.1307, 0.05927, 0.06978, 0.1024, + 0.05962, 0.01446, 0.1246, 0.07216, 0.0576, 0.04099, 0.06919, + 0.06439, 0.1463, 0.07056, 0.08795, 0.1156, 0.06826, 0.02884, + 0.1438, 0.08924, 0.06318, 0.05081, 0.08204, 0.07907, 0.1635, + 0.08303, 0.1081, 0.1293, 0.07747, 0.07305, 0.1833, 0.1272, + 0.07477, 0.073, 0.1104, 0.1108, 0.1976, 0.1112, 0.1544, 0.1578, + 0.09787), .Dim = c(12L, 7L), .Dimnames = list(c("p[1]", "p[2]", + "p[3]", "p[4]", "p[5]", "p[6]", "p[7]", "p[8]", "p[9]", "p[10]", + "p[11]", "p[12]"), c("mean", "sd", "2.5%", "25%", "50%", + "75%", "97.5%"))), structure(c(0.05312, 0.10302, 0.07048, + 0.05924, 0.05155, 0.06905, 0.06683, 0.12337, 0.07011, 0.07828, + 0.10214, 0.06848, 0.07268, 0.40333, 0.01954, 0.02166, 0.01741, + 0.00786, 0.01312, 0.01486, 0.01593, 0.02261, 0.01464, 0.01993, + 0.01758, 0.01165, 0.0101, 0.1541, 0.01824, 0.06663, 0.03985, + 0.04467, 0.02805, 0.04259, 0.03845, 0.08327, 0.04392, 0.04419, + 0.07166, 0.04744, 0.05319, 0.1655, 0.03923, 0.08746, 0.05844, + 0.05381, 0.04215, 0.0587, 0.05584, 0.1072, 0.06004, 0.06443, + 0.08969, 0.06035, 0.06617, 0.2989, 0.05219, 0.101, 0.06913, + 0.05897, 0.05093, 0.0683, 0.06577, 0.1217, 0.06922, 0.07633, + 0.1009, 0.06796, 0.07253, 0.3818, 0.0656, 0.1163, 0.08104, + 0.06431, 0.06019, 0.07812, 0.07685, 0.1379, 0.07919, 0.08994, + 0.1132, 0.07595, 0.07898, 0.48342, 0.09467, 0.1511, 0.1088, + 0.07536, 0.07873, 0.101, 0.1011, 0.1716, 0.1015, 0.1226, + 0.1401, 0.09301, 0.09334, 0.76511), .Dim = c(14L, 7L), .Dimnames = list( + c("p[1]", "p[2]", "p[3]", "p[4]", "p[5]", "p[6]", "p[7]", + "p[8]", "p[9]", "p[10]", "p[11]", "p[12]", "pop.mean", + "sigma"), c("mean", "sd", "2.5%", "25%", "50%", "75%", + "97.5%")))) Property changes on: trunk/R2OpenBUGS/inst/validateInstallOpenBUGS/validOpenBUGSResults.R ___________________________________________________________________ Added: svn:executable + * This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |