R version 2.13.0 (2011-04-13) Copyright (C) 2011 The R Foundation for Statistical Computing ISBN 3-900051-07-0 Platform: i486-pc-linux-gnu (32-bit) R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > x <- c(255 + ,280.2 + ,299.9 + ,339.2 + ,374.2 + ,393.5 + ,389.2 + ,381.7 + ,375.2 + ,369 + ,357.4 + ,352.1 + ,346.5 + ,342.9 + ,340.3 + ,328.3 + ,322.9 + ,314.3 + ,308.9 + ,294 + ,285.6 + ,281.2 + ,280.3 + ,278.8 + ,274.5 + ,270.4 + ,263.4 + ,259.9 + ,258 + ,262.7 + ,284.7 + ,311.3 + ,322.1 + ,327 + ,331.3 + ,333.3 + ,321.4 + ,327 + ,320 + ,314.7 + ,316.7 + ,314.4 + ,321.3 + ,318.2 + ,307.2 + ,301.3 + ,287.5 + ,277.7 + ,274.4 + ,258.8 + ,253.3 + ,251 + ,248.4 + ,249.5 + ,246.1 + ,244.5 + ,243.6 + ,244 + ,240.8 + ,249.8 + ,248 + ,259.4 + ,260.5 + ,260.8 + ,261.3 + ,259.5 + ,256.6 + ,257.9 + ,256.5 + ,254.2 + ,253.3 + ,253.8 + ,255.5 + ,257.1 + ,257.3 + ,253.2 + ,252.8 + ,252 + ,250.7 + ,252.2 + ,250 + ,251 + ,253.4 + ,251.2 + ,255.6 + ,261.1 + ,258.9 + ,259.9 + ,261.2 + ,264.7 + ,267.1 + ,266.4 + ,267.7 + ,268.6 + ,267.5 + ,268.5 + ,268.5 + ,270.5 + ,270.9 + ,270.1 + ,269.3 + ,269.8 + ,270.1 + ,264.9 + ,263.7 + ,264.8 + ,263.7 + ,255.9 + ,276.2 + ,360.1 + ,380.5 + ,373.7 + ,369.8 + ,366.6 + ,359.3 + ,345.8 + ,326.2 + ,324.5 + ,328.1 + ,327.5 + ,324.4 + ,316.5 + ,310.9 + ,301.5 + ,291.7 + ,290.4 + ,287.4 + ,277.7 + ,281.6 + ,288 + ,276 + ,272.9 + ,283 + ,283.3 + ,276.8 + ,284.5 + ,282.7 + ,281.2 + ,287.4 + ,283.1 + ,284 + ,285.5 + ,289.2 + ,292.5 + ,296.4 + ,305.2 + ,303.9 + ,311.5 + ,316.3 + ,316.7 + ,322.5 + ,317.1 + ,309.8 + ,303.8 + ,290.3 + ,293.7 + ,291.7 + ,296.5 + ,289.1 + ,288.5 + ,293.8 + ,297.7 + ,305.4 + ,302.7 + ,302.5 + ,303 + ,294.5 + ,294.1 + ,294.5 + ,297.1 + ,289.4 + ,292.4 + ,287.9 + ,286.6 + ,280.5 + ,272.4 + ,269.2 + ,270.6 + ,267.3 + ,262.5 + ,266.8 + ,268.8 + ,263.1 + ,261.2 + ,266 + ,262.5 + ,265.2 + ,261.3 + ,253.7 + ,249.2 + ,239.1 + ,236.4 + ,235.2 + ,245.2 + ,246.2 + ,247.7 + ,251.4 + ,253.3 + ,254.8 + ,250 + ,249.3 + ,241.5 + ,243.3 + ,248 + ,253 + ,252.9 + ,251.5 + ,251.6 + ,253.5 + ,259.8 + ,334.1 + ,448 + ,445.8 + ,445 + ,448.2 + ,438.2 + ,439.8 + ,423.4 + ,410.8 + ,408.4 + ,406.7 + ,405.9 + ,402.7 + ,405.1 + ,399.6 + ,386.5 + ,381.4 + ,375.2 + ,357.7 + ,359 + ,355 + ,352.7 + ,344.4 + ,343.8 + ,338 + ,339 + ,333.3 + ,334.4 + ,328.3 + ,330.7 + ,330 + ,331.6 + ,351.2 + ,389.4 + ,410.9 + ,442.8 + ,462.8 + ,466.9 + ,461.7 + ,439.2 + ,430.3 + ,416.1 + ,402.5 + ,397.3 + ,403.3 + ,395.9 + ,387.8 + ,378.6 + ,377.1 + ,370.4 + ,362 + ,350.3 + ,348.2 + ,344.6 + ,343.5 + ,342.8 + ,347.6 + ,346.6 + ,349.5 + ,342.1 + ,342 + ,342.8 + ,339.3 + ,348.2 + ,333.7 + ,334.7 + ,354 + ,367.7 + ,363.3 + ,358.4 + ,353.1 + ,343.1 + ,344.6 + ,344.4 + ,333.9 + ,331.7 + ,324.3 + ,321.2 + ,322.4 + ,321.7 + ,320.5 + ,312.8 + ,309.7 + ,315.6 + ,309.7 + ,304.6 + ,302.5 + ,301.5 + ,298.8 + ,291.3 + ,293.6 + ,294.6 + ,285.9 + ,297.6 + ,301.1 + ,293.8 + ,297.7 + ,292.9 + ,292.1 + ,287.2 + ,288.2 + ,283.8 + ,299.9 + ,292.4 + ,293.3 + ,300.8 + ,293.7 + ,293.1 + ,294.4 + ,292.1 + ,291.9 + ,282.5 + ,277.9 + ,287.5 + ,289.2 + ,285.6 + ,293.2 + ,290.8 + ,283.1 + ,275 + ,287.8 + ,287.8 + ,287.4 + ,284 + ,277.8 + ,277.6 + ,304.9 + ,294 + ,300.9 + ,324 + ,332.9 + ,341.6 + ,333.4 + ,348.2 + ,344.7 + ,344.7 + ,329.3 + ,323.5 + ,323.2 + ,317.4 + ,330.1 + ,329.2 + ,334.9 + ,315.8 + ,315.4 + ,319.6 + ,317.3 + ,313.8 + ,315.8 + ,311.3) > par1 = '98' > par1 <- as.numeric(par1) > (n <- length(x)) [1] 360 > (np <- floor(n / par1)) [1] 3 > arr <- array(NA,dim=c(par1,np+1)) > darr <- array(NA,dim=c(par1,np+1)) > ari <- array(0,dim=par1) > dx <- diff(x) > j <- 0 > for (i in 1:n) + { + j = j + 1 + ari[j] = ari[j] + 1 + arr[j,ari[j]] <- x[i] + darr[j,ari[j]] <- dx[i] + if (j == par1) j = 0 + } > ari [1] 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 [39] 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 3 3 3 3 3 3 3 3 3 3 [77] 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 > arr [,1] [,2] [,3] [,4] [1,] 255.0 270.9 251.4 309.7 [2,] 280.2 270.1 253.3 304.6 [3,] 299.9 269.3 254.8 302.5 [4,] 339.2 269.8 250.0 301.5 [5,] 374.2 270.1 249.3 298.8 [6,] 393.5 264.9 241.5 291.3 [7,] 389.2 263.7 243.3 293.6 [8,] 381.7 264.8 248.0 294.6 [9,] 375.2 263.7 253.0 285.9 [10,] 369.0 255.9 252.9 297.6 [11,] 357.4 276.2 251.5 301.1 [12,] 352.1 360.1 251.6 293.8 [13,] 346.5 380.5 253.5 297.7 [14,] 342.9 373.7 259.8 292.9 [15,] 340.3 369.8 334.1 292.1 [16,] 328.3 366.6 448.0 287.2 [17,] 322.9 359.3 445.8 288.2 [18,] 314.3 345.8 445.0 283.8 [19,] 308.9 326.2 448.2 299.9 [20,] 294.0 324.5 438.2 292.4 [21,] 285.6 328.1 439.8 293.3 [22,] 281.2 327.5 423.4 300.8 [23,] 280.3 324.4 410.8 293.7 [24,] 278.8 316.5 408.4 293.1 [25,] 274.5 310.9 406.7 294.4 [26,] 270.4 301.5 405.9 292.1 [27,] 263.4 291.7 402.7 291.9 [28,] 259.9 290.4 405.1 282.5 [29,] 258.0 287.4 399.6 277.9 [30,] 262.7 277.7 386.5 287.5 [31,] 284.7 281.6 381.4 289.2 [32,] 311.3 288.0 375.2 285.6 [33,] 322.1 276.0 357.7 293.2 [34,] 327.0 272.9 359.0 290.8 [35,] 331.3 283.0 355.0 283.1 [36,] 333.3 283.3 352.7 275.0 [37,] 321.4 276.8 344.4 287.8 [38,] 327.0 284.5 343.8 287.8 [39,] 320.0 282.7 338.0 287.4 [40,] 314.7 281.2 339.0 284.0 [41,] 316.7 287.4 333.3 277.8 [42,] 314.4 283.1 334.4 277.6 [43,] 321.3 284.0 328.3 304.9 [44,] 318.2 285.5 330.7 294.0 [45,] 307.2 289.2 330.0 300.9 [46,] 301.3 292.5 331.6 324.0 [47,] 287.5 296.4 351.2 332.9 [48,] 277.7 305.2 389.4 341.6 [49,] 274.4 303.9 410.9 333.4 [50,] 258.8 311.5 442.8 348.2 [51,] 253.3 316.3 462.8 344.7 [52,] 251.0 316.7 466.9 344.7 [53,] 248.4 322.5 461.7 329.3 [54,] 249.5 317.1 439.2 323.5 [55,] 246.1 309.8 430.3 323.2 [56,] 244.5 303.8 416.1 317.4 [57,] 243.6 290.3 402.5 330.1 [58,] 244.0 293.7 397.3 329.2 [59,] 240.8 291.7 403.3 334.9 [60,] 249.8 296.5 395.9 315.8 [61,] 248.0 289.1 387.8 315.4 [62,] 259.4 288.5 378.6 319.6 [63,] 260.5 293.8 377.1 317.3 [64,] 260.8 297.7 370.4 313.8 [65,] 261.3 305.4 362.0 315.8 [66,] 259.5 302.7 350.3 311.3 [67,] 256.6 302.5 348.2 NA [68,] 257.9 303.0 344.6 NA [69,] 256.5 294.5 343.5 NA [70,] 254.2 294.1 342.8 NA [71,] 253.3 294.5 347.6 NA [72,] 253.8 297.1 346.6 NA [73,] 255.5 289.4 349.5 NA [74,] 257.1 292.4 342.1 NA [75,] 257.3 287.9 342.0 NA [76,] 253.2 286.6 342.8 NA [77,] 252.8 280.5 339.3 NA [78,] 252.0 272.4 348.2 NA [79,] 250.7 269.2 333.7 NA [80,] 252.2 270.6 334.7 NA [81,] 250.0 267.3 354.0 NA [82,] 251.0 262.5 367.7 NA [83,] 253.4 266.8 363.3 NA [84,] 251.2 268.8 358.4 NA [85,] 255.6 263.1 353.1 NA [86,] 261.1 261.2 343.1 NA [87,] 258.9 266.0 344.6 NA [88,] 259.9 262.5 344.4 NA [89,] 261.2 265.2 333.9 NA [90,] 264.7 261.3 331.7 NA [91,] 267.1 253.7 324.3 NA [92,] 266.4 249.2 321.2 NA [93,] 267.7 239.1 322.4 NA [94,] 268.6 236.4 321.7 NA [95,] 267.5 235.2 320.5 NA [96,] 268.5 245.2 312.8 NA [97,] 268.5 246.2 309.7 NA [98,] 270.5 247.7 315.6 NA > darr [,1] [,2] [,3] [,4] [1,] 25.2 -0.8 1.9 -5.1 [2,] 19.7 -0.8 1.5 -2.1 [3,] 39.3 0.5 -4.8 -1.0 [4,] 35.0 0.3 -0.7 -2.7 [5,] 19.3 -5.2 -7.8 -7.5 [6,] -4.3 -1.2 1.8 2.3 [7,] -7.5 1.1 4.7 1.0 [8,] -6.5 -1.1 5.0 -8.7 [9,] -6.2 -7.8 -0.1 11.7 [10,] -11.6 20.3 -1.4 3.5 [11,] -5.3 83.9 0.1 -7.3 [12,] -5.6 20.4 1.9 3.9 [13,] -3.6 -6.8 6.3 -4.8 [14,] -2.6 -3.9 74.3 -0.8 [15,] -12.0 -3.2 113.9 -4.9 [16,] -5.4 -7.3 -2.2 1.0 [17,] -8.6 -13.5 -0.8 -4.4 [18,] -5.4 -19.6 3.2 16.1 [19,] -14.9 -1.7 -10.0 -7.5 [20,] -8.4 3.6 1.6 0.9 [21,] -4.4 -0.6 -16.4 7.5 [22,] -0.9 -3.1 -12.6 -7.1 [23,] -1.5 -7.9 -2.4 -0.6 [24,] -4.3 -5.6 -1.7 1.3 [25,] -4.1 -9.4 -0.8 -2.3 [26,] -7.0 -9.8 -3.2 -0.2 [27,] -3.5 -1.3 2.4 -9.4 [28,] -1.9 -3.0 -5.5 -4.6 [29,] 4.7 -9.7 -13.1 9.6 [30,] 22.0 3.9 -5.1 1.7 [31,] 26.6 6.4 -6.2 -3.6 [32,] 10.8 -12.0 -17.5 7.6 [33,] 4.9 -3.1 1.3 -2.4 [34,] 4.3 10.1 -4.0 -7.7 [35,] 2.0 0.3 -2.3 -8.1 [36,] -11.9 -6.5 -8.3 12.8 [37,] 5.6 7.7 -0.6 0.0 [38,] -7.0 -1.8 -5.8 -0.4 [39,] -5.3 -1.5 1.0 -3.4 [40,] 2.0 6.2 -5.7 -6.2 [41,] -2.3 -4.3 1.1 -0.2 [42,] 6.9 0.9 -6.1 27.3 [43,] -3.1 1.5 2.4 -10.9 [44,] -11.0 3.7 -0.7 6.9 [45,] -5.9 3.3 1.6 23.1 [46,] -13.8 3.9 19.6 8.9 [47,] -9.8 8.8 38.2 8.7 [48,] -3.3 -1.3 21.5 -8.2 [49,] -15.6 7.6 31.9 14.8 [50,] -5.5 4.8 20.0 -3.5 [51,] -2.3 0.4 4.1 0.0 [52,] -2.6 5.8 -5.2 -15.4 [53,] 1.1 -5.4 -22.5 -5.8 [54,] -3.4 -7.3 -8.9 -0.3 [55,] -1.6 -6.0 -14.2 -5.8 [56,] -0.9 -13.5 -13.6 12.7 [57,] 0.4 3.4 -5.2 -0.9 [58,] -3.2 -2.0 6.0 5.7 [59,] 9.0 4.8 -7.4 -19.1 [60,] -1.8 -7.4 -8.1 -0.4 [61,] 11.4 -0.6 -9.2 4.2 [62,] 1.1 5.3 -1.5 -2.3 [63,] 0.3 3.9 -6.7 -3.5 [64,] 0.5 7.7 -8.4 2.0 [65,] -1.8 -2.7 -11.7 -4.5 [66,] -2.9 -0.2 -2.1 NA [67,] 1.3 0.5 -3.6 NA [68,] -1.4 -8.5 -1.1 NA [69,] -2.3 -0.4 -0.7 NA [70,] -0.9 0.4 4.8 NA [71,] 0.5 2.6 -1.0 NA [72,] 1.7 -7.7 2.9 NA [73,] 1.6 3.0 -7.4 NA [74,] 0.2 -4.5 -0.1 NA [75,] -4.1 -1.3 0.8 NA [76,] -0.4 -6.1 -3.5 NA [77,] -0.8 -8.1 8.9 NA [78,] -1.3 -3.2 -14.5 NA [79,] 1.5 1.4 1.0 NA [80,] -2.2 -3.3 19.3 NA [81,] 1.0 -4.8 13.7 NA [82,] 2.4 4.3 -4.4 NA [83,] -2.2 2.0 -4.9 NA [84,] 4.4 -5.7 -5.3 NA [85,] 5.5 -1.9 -10.0 NA [86,] -2.2 4.8 1.5 NA [87,] 1.0 -3.5 -0.2 NA [88,] 1.3 2.7 -10.5 NA [89,] 3.5 -3.9 -2.2 NA [90,] 2.4 -7.6 -7.4 NA [91,] -0.7 -4.5 -3.1 NA [92,] 1.3 -10.1 1.2 NA [93,] 0.9 -2.7 -0.7 NA [94,] -1.1 -1.2 -1.2 NA [95,] 1.0 10.0 -7.7 NA [96,] 0.0 1.0 -3.1 NA [97,] 2.0 1.5 5.9 NA [98,] 0.4 3.7 -5.9 NA > arr.mean <- array(NA,dim=par1) > arr.median <- array(NA,dim=par1) > arr.midrange <- array(NA,dim=par1) > for (j in 1:par1) + { + arr.mean[j] <- mean(arr[j,],na.rm=TRUE) + arr.median[j] <- median(arr[j,],na.rm=TRUE) + arr.midrange[j] <- (quantile(arr[j,],0.75,na.rm=TRUE) + quantile(arr[j,],0.25,na.rm=TRUE)) / 2 + } > overall.mean <- mean(x) > overall.median <- median(x) > overall.midrange <- (quantile(x,0.75) + quantile(x,0.25)) / 2 > postscript(file="/var/wessaorg/rcomp/tmp/1mfdf1321356701.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > plot(arr.mean,type='b',ylab='mean',main='Mean Plot',xlab='Periodic Index') > mtext(paste('#blocks = ',np)) > abline(overall.mean,0) > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/2q0r51321356701.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > plot(arr.median,type='b',ylab='median',main='Median Plot',xlab='Periodic Index') > mtext(paste('#blocks = ',np)) > abline(overall.median,0) > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/3jtub1321356701.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > plot(arr.midrange,type='b',ylab='midrange',main='Midrange Plot',xlab='Periodic Index') > mtext(paste('#blocks = ',np)) > abline(overall.midrange,0) > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/476iq1321356701.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > z <- data.frame(t(arr)) > names(z) <- c(1:par1) > (boxplot(z,notch=TRUE,col='grey',xlab='Periodic Index',ylab='Value',main='Notched Box Plots - Periodic Subseries')) $stats [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [1,] 251.40 253.30 254.80 250.00 249.30 241.5 243.30 248.00 253.00 252.90 [2,] 253.20 261.70 262.05 259.90 259.70 253.2 253.50 256.40 258.35 254.40 [3,] 262.95 275.15 284.60 285.65 284.45 278.1 278.65 279.70 274.80 276.75 [4,] 290.30 292.40 301.20 320.35 336.50 342.4 341.40 338.15 330.55 333.30 [5,] 309.70 304.60 302.50 339.20 374.20 393.5 389.20 381.70 375.20 369.00 [,11] [,12] [,13] [,14] [,15] [,16] [,17] [,18] [,19] [,20] [1,] 251.50 251.60 253.5 259.80 292.10 287.20 288.20 283.80 299.90 292.40 [2,] 263.85 272.70 275.6 276.35 313.10 307.75 305.55 299.05 304.40 293.20 [3,] 288.65 322.95 322.1 317.90 337.20 347.45 341.10 330.05 317.55 309.25 [4,] 329.25 356.10 363.5 358.30 355.05 407.30 402.55 395.40 387.20 381.35 [5,] 357.40 360.10 380.5 373.70 369.80 448.00 445.80 445.00 448.20 438.20 [,21] [,22] [,23] [,24] [,25] [,26] [,27] [,28] [,29] [,30] [1,] 285.60 281.20 280.30 278.80 274.50 270.40 263.40 259.90 258.00 262.7 [2,] 289.45 291.00 287.00 285.95 284.45 281.25 277.55 271.20 267.95 270.2 [3,] 310.70 314.15 309.05 304.80 302.65 296.80 291.80 286.45 282.65 282.6 [4,] 383.95 375.45 367.60 362.45 358.80 353.70 347.30 347.75 343.50 337.0 [5,] 439.80 423.40 410.80 408.40 406.70 405.90 402.70 405.10 399.60 386.5 [,31] [,32] [,33] [,34] [,35] [,36] [,37] [,38] [,39] [,40] [1,] 281.60 285.60 276.00 272.90 283.00 275.00 276.8 284.50 282.70 281.20 [2,] 283.15 286.80 284.60 281.85 283.05 279.15 282.3 286.15 285.05 282.60 [3,] 286.95 299.65 307.65 308.90 307.20 308.30 304.6 307.40 303.70 299.35 [4,] 335.30 343.25 339.90 343.00 343.15 343.00 332.9 335.40 329.00 326.85 [5,] 381.40 375.20 357.70 359.00 355.00 352.70 344.4 343.80 338.00 339.00 [,41] [,42] [,43] [,44] [,45] [,46] [,47] [,48] [,49] [,50] [1,] 277.80 277.60 284.00 285.50 289.20 292.50 287.50 277.70 274.40 258.80 [2,] 282.60 280.35 294.45 289.75 295.05 296.90 291.95 291.45 289.15 285.15 [3,] 302.05 298.75 313.10 306.10 304.05 312.65 314.65 323.40 318.65 329.85 [4,] 325.00 324.40 324.80 324.45 318.60 327.80 342.05 365.50 372.15 395.50 [5,] 333.30 334.40 328.30 330.70 330.00 331.60 351.20 389.40 410.90 442.80 [,51] [,52] [,53] [,54] [,55] [,56] [,57] [,58] [,59] [,60] [1,] 253.30 251.00 248.40 249.50 246.10 244.50 243.60 244.00 240.80 249.80 [2,] 284.80 283.85 285.45 283.30 277.95 274.15 266.95 268.85 266.25 273.15 [3,] 330.50 330.70 325.90 320.30 316.50 310.60 310.20 311.45 313.30 306.15 [4,] 403.75 405.80 395.50 381.35 376.75 366.75 366.30 363.25 369.10 355.85 [5,] 462.80 466.90 461.70 439.20 430.30 416.10 402.50 397.30 403.30 395.90 [,61] [,62] [,63] [,64] [,65] [,66] [,67] [,68] [,69] [,70] [,71] [1,] 248.00 259.40 260.50 260.80 261.30 259.5 256.60 257.90 256.5 254.20 253.30 [2,] 268.55 273.95 277.15 279.25 283.35 281.1 279.55 280.45 275.5 274.15 273.90 [3,] 302.25 304.05 305.55 305.75 310.60 307.0 302.50 303.00 294.5 294.10 294.50 [4,] 351.60 349.10 347.20 342.10 338.90 330.8 325.35 323.80 319.0 318.45 321.05 [5,] 387.80 378.60 377.10 370.40 362.00 350.3 348.20 344.60 343.5 342.80 347.60 [,72] [,73] [,74] [,75] [,76] [,77] [,78] [,79] [,80] [,81] [,82] [1,] 253.80 255.50 257.10 257.30 253.2 252.80 252.0 250.70 252.20 250.00 251.00 [2,] 275.45 272.45 274.75 272.60 269.9 266.65 262.2 259.95 261.40 258.65 256.75 [3,] 297.10 289.40 292.40 287.90 286.6 280.50 272.4 269.20 270.60 267.30 262.50 [4,] 321.85 319.45 317.25 314.95 314.7 309.90 310.3 301.45 302.65 310.65 315.10 [5,] 346.60 349.50 342.10 342.00 342.8 339.30 348.2 333.70 334.70 354.00 367.70 [,83] [,84] [,85] [,86] [,87] [,88] [,89] [,90] [,91] [,92] [,93] [1,] 253.40 251.2 255.60 261.10 258.90 259.90 261.20 261.3 253.7 249.2 239.10 [2,] 260.10 260.0 259.35 261.15 262.45 261.20 263.20 263.0 260.4 257.8 253.40 [3,] 266.80 268.8 263.10 261.20 266.00 262.50 265.20 264.7 267.1 266.4 267.70 [4,] 315.05 313.6 308.10 302.15 305.30 303.45 299.55 298.2 295.7 293.8 295.05 [5,] 363.30 358.4 353.10 343.10 344.60 344.40 333.90 331.7 324.3 321.2 322.40 [,94] [,95] [,96] [,97] [,98] [1,] 236.40 235.20 245.20 246.20 247.70 [2,] 252.50 251.35 256.85 257.35 259.10 [3,] 268.60 267.50 268.50 268.50 270.50 [4,] 295.15 294.00 290.65 289.10 293.05 [5,] 321.70 320.50 312.80 309.70 315.60 $n [1] 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 [39] 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 3 3 3 3 3 3 3 3 3 3 [77] 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 $conf [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [1,] 233.641 250.897 253.6715 237.8945 223.778 207.632 209.209 215.1175 217.762 [2,] 292.259 299.403 315.5285 333.4055 345.122 348.568 348.091 344.2825 331.838 [,10] [,11] [,12] [,13] [,14] [,15] [,16] [,17] [,18] [1,] 214.419 236.984 257.064 252.659 253.1595 304.0595 268.8055 264.47 253.9335 [2,] 339.081 340.316 388.836 391.541 382.6405 370.3405 426.0945 417.73 406.1665 [,19] [,20] [,21] [,22] [,23] [,24] [,25] [,26] [1,] 252.138 239.6115 236.045 247.4345 245.376 244.365 243.9135 239.5645 [2,] 382.962 378.8885 385.355 380.8655 372.724 365.235 361.3865 354.0355 [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [1,] 236.6975 225.9755 222.9655 229.828 245.7515 255.0545 263.963 260.5915 [2,] 346.9025 346.9245 342.3345 335.372 328.1485 344.2455 351.337 357.2085 [,35] [,36] [,37] [,38] [,39] [,40] [,41] [,42] [1,] 259.721 257.8585 264.626 268.4925 268.9795 264.3925 268.554 263.9505 [2,] 354.679 358.7415 344.574 346.3075 338.4205 334.3075 335.546 333.5495 [,43] [,44] [,45] [,46] [,47] [,48] [,49] [,50] [1,] 289.1235 278.687 285.4455 288.239 275.071 264.9005 253.08 242.6735 [2,] 337.0765 333.513 322.6545 337.061 354.229 381.8995 384.22 417.0265 [,51] [,52] [,53] [,54] [,55] [,56] [,57] [,58] [1,] 236.5295 234.3595 238.9605 242.8405 238.448 237.446 231.7135 236.874 [2,] 424.4705 427.0405 412.8395 397.7595 394.552 383.754 388.6865 386.026 [,59] [,60] [,61] [,62] [,63] [,64] [,65] [,66] [1,] 232.0485 240.817 236.6405 244.6815 250.2105 256.0985 266.7155 267.737 [2,] 394.5515 371.483 367.8595 363.4185 360.8895 355.4015 354.4845 346.263 [,67] [,68] [,69] [,70] [,71] [,72] [,73] [,74] [1,] 260.7206 263.4555 254.8187 253.6889 251.4891 254.7733 246.526 253.6309 [2,] 344.2794 342.5445 334.1813 334.5111 337.5109 339.4267 332.274 331.1691 [,75] [,76] [,77] [,78] [,79] [,80] [,81] [,82] [1,] 249.2678 245.7328 241.0468 228.5225 231.3431 232.9712 219.8649 209.2723 [2,] 326.5322 327.4672 319.9532 316.2775 307.0569 308.2288 314.7351 315.7277 [,83] [,84] [,85] [,86] [,87] [,88] [,89] [,90] [1,] 216.6739 219.9054 218.6296 223.7992 226.9117 223.959 232.041 232.5901 [2,] 316.9261 317.6946 307.5704 298.6008 305.0883 301.041 298.359 296.8099 [,91] [,92] [,93] [,94] [,95] [,96] [,97] [,98] [1,] 234.8989 233.5603 229.7063 229.6941 228.5941 237.6672 239.5372 239.5304 [2,] 299.3011 299.2397 305.6937 307.5059 306.4059 299.3328 297.4628 301.4696 $out numeric(0) $group numeric(0) $names [1] "1" "2" "3" "4" "5" "6" "7" "8" "9" "10" "11" "12" "13" "14" "15" [16] "16" "17" "18" "19" "20" "21" "22" "23" "24" "25" "26" "27" "28" "29" "30" [31] "31" "32" "33" "34" "35" "36" "37" "38" "39" "40" "41" "42" "43" "44" "45" [46] "46" "47" "48" "49" "50" "51" "52" "53" "54" "55" "56" "57" "58" "59" "60" [61] "61" "62" "63" "64" "65" "66" "67" "68" "69" "70" "71" "72" "73" "74" "75" [76] "76" "77" "78" "79" "80" "81" "82" "83" "84" "85" "86" "87" "88" "89" "90" [91] "91" "92" "93" "94" "95" "96" "97" "98" Warning message: In bxp(list(stats = c(251.4, 253.2, 262.95, 290.3, 309.7, 253.3, : some notches went outside hinges ('box'): maybe set notch=FALSE > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/5vghw1321356701.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > z <- data.frame(t(darr)) > names(z) <- c(1:par1) > (boxplot(z,notch=TRUE,col='grey',xlab='Periodic Index',ylab='Value',main='Notched Box Plots - Differenced Periodic Subseries')) $stats [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [1,] -5.10 -2.10 -4.80 -2.70 -7.80 -4.30 -7.50 -8.70 -7.80 -11.60 -7.3 -5.60 [2,] -2.95 -1.45 -2.90 -1.70 -7.65 -2.75 -3.25 -7.60 -7.00 -6.50 -6.3 -1.85 [3,] 0.55 0.35 -0.25 -0.20 -6.35 0.30 1.05 -3.80 -3.15 1.05 -2.6 2.90 [4,] 13.55 10.60 19.90 17.65 7.05 2.05 2.90 1.95 5.80 11.90 42.0 12.15 [5,] 25.20 19.70 39.30 35.00 19.30 2.30 4.70 5.00 11.70 20.30 83.9 20.40 [,13] [,14] [,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [1,] -6.80 -3.90 -12.00 -7.30 -13.50 -19.60 -14.90 -8.40 -16.40 -12.60 -7.90 [2,] -5.80 -3.25 -8.45 -6.35 -11.05 -12.50 -12.45 -3.75 -10.40 -9.85 -5.15 [3,] -4.20 -1.70 -4.05 -3.80 -6.50 -1.10 -8.75 1.25 -2.50 -5.10 -1.95 [4,] 1.35 36.75 55.35 -0.60 -2.60 9.65 -4.60 2.60 3.45 -2.00 -1.05 [5,] 6.30 74.30 113.90 1.00 -0.80 16.10 -1.70 3.60 7.50 -0.90 -0.60 [,24] [,25] [,26] [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [1,] -5.60 -9.40 -9.8 -9.40 -5.50 -13.10 -5.10 -6.2 -17.50 -3.10 -7.70 -8.10 [2,] -4.95 -6.75 -8.4 -6.45 -5.05 -11.40 -1.70 -4.9 -14.75 -2.75 -5.85 -5.20 [3,] -3.00 -3.20 -5.1 -2.40 -3.80 -2.50 2.80 1.4 -2.20 -0.55 0.15 -1.00 [4,] -0.20 -1.55 -1.7 0.55 -2.45 7.15 12.95 16.5 9.20 3.10 7.20 1.15 [5,] 1.30 -0.80 -0.2 2.40 -1.90 9.60 22.00 26.6 10.80 4.90 10.10 2.00 [,36] [,37] [,38] [,39] [,40] [,41] [,42] [,43] [,44] [,45] [,46] [1,] -11.90 -0.60 -7.0 -5.30 -6.20 -4.30 -6.1 -10.90 -11.00 -5.90 -13.80 [2,] -10.10 -0.30 -6.4 -4.35 -5.95 -3.30 -2.6 -7.00 -5.85 -2.15 -4.95 [3,] -7.40 2.80 -3.8 -2.45 -1.85 -1.25 3.9 -0.80 1.50 2.45 6.40 [4,] 3.15 6.65 -1.1 -0.25 4.10 0.45 17.1 1.95 5.30 13.20 14.25 [5,] 12.80 7.70 -0.4 1.00 6.20 1.10 27.3 2.40 6.90 23.10 19.60 [,47] [,48] [,49] [,50] [,51] [,52] [,53] [,54] [,55] [,56] [,57] [,58] [1,] -9.80 -8.20 -15.60 -5.50 -2.30 -15.4 -22.50 -8.90 -14.2 -13.60 -5.20 -3.20 [2,] -0.55 -5.75 -4.00 -4.50 -1.15 -10.3 -14.15 -8.10 -10.1 -13.55 -3.05 -2.60 [3,] 8.75 -2.30 11.20 0.65 0.20 -3.9 -5.60 -5.35 -5.9 -7.20 -0.25 1.85 [4,] 23.50 10.10 23.35 12.40 2.25 1.6 -2.15 -1.85 -3.7 5.90 1.90 5.85 [5,] 38.20 21.50 31.90 20.00 4.10 5.8 1.10 -0.30 -1.6 12.70 3.40 6.00 [,59] [,60] [,61] [,62] [,63] [,64] [,65] [,66] [,67] [,68] [,69] [,70] [1,] -19.10 -8.10 -9.2 -2.3 -6.7 -8.40 -11.70 -2.90 -3.60 -8.50 -2.30 -0.90 [2,] -13.25 -7.75 -4.9 -1.9 -5.1 -3.95 -8.10 -2.50 -1.55 -4.95 -1.50 -0.25 [3,] -1.30 -4.60 1.8 -0.2 -1.6 1.25 -3.60 -2.10 0.50 -1.40 -0.70 0.40 [4,] 6.90 -1.10 7.8 3.2 2.1 4.85 -2.25 -1.15 0.90 -1.25 -0.55 2.60 [5,] 9.00 -0.40 11.4 5.3 3.9 7.70 -1.80 -0.20 1.30 -1.10 -0.40 4.80 [,71] [,72] [,73] [,74] [,75] [,76] [,77] [,78] [,79] [,80] [,81] [,82] [1,] -1.00 -7.7 -7.4 -4.50 -4.10 -6.10 -8.10 -14.50 1.00 -3.30 -4.80 -4.40 [2,] -0.25 -3.0 -2.9 -2.30 -2.70 -4.80 -4.45 -8.85 1.20 -2.75 -1.90 -1.00 [3,] 0.50 1.7 1.6 -0.10 -1.30 -3.50 -0.80 -3.20 1.40 -2.20 1.00 2.40 [4,] 1.55 2.3 2.3 0.05 -0.25 -1.95 4.05 -2.25 1.45 8.55 7.35 3.35 [5,] 2.60 2.9 3.0 0.20 0.80 -0.40 8.90 -1.30 1.50 19.30 13.70 4.30 [,83] [,84] [,85] [,86] [,87] [,88] [,89] [,90] [,91] [,92] [,93] [,94] [1,] -4.90 -5.70 -10.00 -2.20 -3.50 -10.5 -3.90 -7.6 -4.5 -10.10 -2.7 -1.20 [2,] -3.55 -5.50 -5.95 -0.35 -1.85 -4.6 -3.05 -7.5 -3.8 -4.45 -1.7 -1.20 [3,] -2.20 -5.30 -1.90 1.50 -0.20 1.3 -2.20 -7.4 -3.1 1.20 -0.7 -1.20 [4,] -0.10 -0.45 1.80 3.15 0.40 2.0 0.65 -2.5 -1.9 1.25 0.1 -1.15 [5,] 2.00 4.40 5.50 4.80 1.00 2.7 3.50 2.4 -0.7 1.30 0.9 -1.10 [,95] [,96] [,97] [,98] [1,] -7.70 -3.10 1.50 -5.90 [2,] -3.35 -1.55 1.75 -2.75 [3,] 1.00 0.00 2.00 0.40 [4,] 5.50 0.50 3.95 2.05 [5,] 10.00 1.00 5.90 3.70 $n [1] 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 [39] 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 3 3 3 3 3 3 3 3 3 3 3 [77] 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 $conf [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [1,] -12.485 -9.1695 -18.262 -15.4865 -17.963 -3.492 -3.8085 -11.3445 -13.262 [2,] 13.585 9.8695 17.762 15.0865 5.263 4.092 5.9085 3.7445 6.962 [,10] [,11] [,12] [,13] [,14] [,15] [,16] [,17] [,18] [1,] -13.486 -40.757 -8.16 -9.8485 -33.3 -54.452 -8.3425 -13.1755 -18.5985 [2,] 15.586 35.557 13.96 1.4485 29.9 46.352 0.7425 0.1755 16.3985 [,19] [,20] [,21] [,22] [,23] [,24] [,25] [,26] [,27] [1,] -14.9515 -3.7665 -13.4415 -11.3015 -5.189 -6.7525 -7.308 -10.393 -7.93 [2,] -2.5485 6.2665 8.4415 1.1015 1.289 0.7525 0.908 0.193 3.13 [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [,36] [1,] -5.854 -17.1545 -8.7735 -15.506 -21.1205 -5.1715 -10.1595 -6.0165 -17.8675 [2,] -1.746 12.1545 14.3735 18.306 16.7205 4.0715 10.4595 4.0165 3.0675 [,37] [,38] [,39] [,40] [,41] [,42] [,43] [,44] [,45] [1,] -2.6905 -7.987 -5.689 -9.7895 -4.2125 -11.663 -7.8705 -7.3085 -9.6765 [2,] 8.2905 0.387 0.789 6.0895 1.7125 19.463 6.2705 10.3085 14.5765 [,46] [,47] [,48] [,49] [,50] [,51] [,52] [,53] [,54] [1,] -8.768 -10.2495 -14.8215 -10.4065 -12.701 -2.486 -13.301 -15.08 -10.2875 [2,] 21.568 27.7495 10.2215 32.8065 14.001 2.886 5.501 3.88 -0.4125 [,55] [,56] [,57] [,58] [,59] [,60] [,61] [,62] [,63] [1,] -10.956 -22.5655 -4.1605 -4.8255 -17.2185 -9.8535 -8.233 -4.229 -7.288 [2,] -0.844 8.1655 3.6605 8.5255 14.6185 0.6535 11.833 3.829 4.088 [,64] [,65] [,66] [,67] [,68] [,69] [,70] [1,] -5.702 -8.2215 -3.3314881 -1.734923 -4.77519 -1.5666028 -2.199808 [2,] 8.202 1.0215 -0.8685119 2.734923 1.97519 0.1666028 2.999808 [,71] [,72] [,73] [,74] [,75] [,76] [,77] [1,] -1.141984 -3.134731 -3.14351 -2.243702 -3.5349229 -6.0998083 -8.553814 [2,] 2.141984 6.534731 6.34351 2.043702 0.9349229 -0.9001917 6.953814 [,78] [,79] [,80] [,81] [,82] [,83] [,84] [1,] -9.220609 1.171947 -12.508012 -7.437974 -1.568128 -5.3471363 -9.9066778 [2,] 2.820609 1.628053 8.108012 9.437974 6.368128 0.9471363 -0.6933222 [,85] [,86] [,87] [,88] [,89] [,90] [,91] [1,] -8.969654 -1.692747 -2.25248 -4.720609 -5.57519 -11.961067 -4.833206 [2,] 5.169654 4.692747 1.85248 7.320609 1.17519 -2.838933 -1.366794 [,92] [,93] [,94] [,95] [,96] [,97] [,98] [1,] -3.999617 -2.3419842 -1.245611 -7.073089 -1.870038 -0.006869536 -3.978624 [2,] 6.399617 0.9419842 -1.154389 9.073089 1.870038 4.006869536 4.778624 $out numeric(0) $group numeric(0) $names [1] "1" "2" "3" "4" "5" "6" "7" "8" "9" "10" "11" "12" "13" "14" "15" [16] "16" "17" "18" "19" "20" "21" "22" "23" "24" "25" "26" "27" "28" "29" "30" [31] "31" "32" "33" "34" "35" "36" "37" "38" "39" "40" "41" "42" "43" "44" "45" [46] "46" "47" "48" "49" "50" "51" "52" "53" "54" "55" "56" "57" "58" "59" "60" [61] "61" "62" "63" "64" "65" "66" "67" "68" "69" "70" "71" "72" "73" "74" "75" [76] "76" "77" "78" "79" "80" "81" "82" "83" "84" "85" "86" "87" "88" "89" "90" [91] "91" "92" "93" "94" "95" "96" "97" "98" Warning message: In bxp(list(stats = c(-5.09999999999997, -2.94999999999996, 0.550000000000026, : some notches went outside hinges ('box'): maybe set notch=FALSE > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/6bj2x1321356701.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > z <- data.frame(arr) > names(z) <- c(1:np) > (boxplot(z,notch=TRUE,col='grey',xlab='Block Index',ylab='Value',main='Notched Box Plots - Sequential Blocks')) $stats [,1] [,2] [,3] [,4] [1,] 240.8 235.20 241.5 275.0 [2,] 255.5 269.30 330.7 289.2 [3,] 267.6 287.65 347.9 296.1 [4,] 314.7 303.00 397.3 315.8 [5,] 393.5 345.80 466.9 348.2 $n [1] 98 98 98 66 $conf [,1] [,2] [,3] [,4] [1,] 258.1514 282.2713 337.2704 290.9267 [2,] 277.0486 293.0287 358.5296 301.2733 $out [1] 360.1 380.5 373.7 369.8 366.6 359.3 $group [1] 2 2 2 2 2 2 $names [1] "1" "2" "3" NA > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/7n29b1321356701.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > z <- data.frame(cbind(arr.mean,arr.median,arr.midrange)) > names(z) <- list('mean','median','midrange') > (boxplot(z,notch=TRUE,col='grey',ylab='Overall Central Tendency',main='Notched Box Plots')) $stats [,1] [,2] [,3] [1,] 271.7500 261.20 267.3500 [2,] 293.7333 276.75 286.8000 [3,] 306.3875 299.50 302.2875 [4,] 317.0000 310.60 313.7500 [5,] 347.2250 347.45 352.4875 $n [1] 98 98 98 $conf [,1] [,2] [,3] [1,] 302.674 294.0974 297.9862 [2,] 310.101 304.9026 306.5888 $out [1] 357.525 354.050 $group [1] 1 1 $names [1] "mean" "median" "midrange" > dev.off() null device 1 > > try(system("convert tmp/1mfdf1321356701.ps tmp/1mfdf1321356701.png",intern=TRUE)) character(0) > try(system("convert tmp/2q0r51321356701.ps tmp/2q0r51321356701.png",intern=TRUE)) character(0) > try(system("convert tmp/3jtub1321356701.ps tmp/3jtub1321356701.png",intern=TRUE)) character(0) > try(system("convert tmp/476iq1321356701.ps tmp/476iq1321356701.png",intern=TRUE)) character(0) > try(system("convert tmp/5vghw1321356701.ps tmp/5vghw1321356701.png",intern=TRUE)) character(0) > try(system("convert tmp/6bj2x1321356701.ps tmp/6bj2x1321356701.png",intern=TRUE)) character(0) > try(system("convert tmp/7n29b1321356701.ps tmp/7n29b1321356701.png",intern=TRUE)) character(0) > > > proc.time() user system elapsed 2.002 0.341 2.359