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 = '96' > 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 4 4 4 4 4 4 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 > arr [,1] [,2] [,3] [,4] [1,] 255.0 268.5 235.2 322.4 [2,] 280.2 270.5 245.2 321.7 [3,] 299.9 270.9 246.2 320.5 [4,] 339.2 270.1 247.7 312.8 [5,] 374.2 269.3 251.4 309.7 [6,] 393.5 269.8 253.3 315.6 [7,] 389.2 270.1 254.8 309.7 [8,] 381.7 264.9 250.0 304.6 [9,] 375.2 263.7 249.3 302.5 [10,] 369.0 264.8 241.5 301.5 [11,] 357.4 263.7 243.3 298.8 [12,] 352.1 255.9 248.0 291.3 [13,] 346.5 276.2 253.0 293.6 [14,] 342.9 360.1 252.9 294.6 [15,] 340.3 380.5 251.5 285.9 [16,] 328.3 373.7 251.6 297.6 [17,] 322.9 369.8 253.5 301.1 [18,] 314.3 366.6 259.8 293.8 [19,] 308.9 359.3 334.1 297.7 [20,] 294.0 345.8 448.0 292.9 [21,] 285.6 326.2 445.8 292.1 [22,] 281.2 324.5 445.0 287.2 [23,] 280.3 328.1 448.2 288.2 [24,] 278.8 327.5 438.2 283.8 [25,] 274.5 324.4 439.8 299.9 [26,] 270.4 316.5 423.4 292.4 [27,] 263.4 310.9 410.8 293.3 [28,] 259.9 301.5 408.4 300.8 [29,] 258.0 291.7 406.7 293.7 [30,] 262.7 290.4 405.9 293.1 [31,] 284.7 287.4 402.7 294.4 [32,] 311.3 277.7 405.1 292.1 [33,] 322.1 281.6 399.6 291.9 [34,] 327.0 288.0 386.5 282.5 [35,] 331.3 276.0 381.4 277.9 [36,] 333.3 272.9 375.2 287.5 [37,] 321.4 283.0 357.7 289.2 [38,] 327.0 283.3 359.0 285.6 [39,] 320.0 276.8 355.0 293.2 [40,] 314.7 284.5 352.7 290.8 [41,] 316.7 282.7 344.4 283.1 [42,] 314.4 281.2 343.8 275.0 [43,] 321.3 287.4 338.0 287.8 [44,] 318.2 283.1 339.0 287.8 [45,] 307.2 284.0 333.3 287.4 [46,] 301.3 285.5 334.4 284.0 [47,] 287.5 289.2 328.3 277.8 [48,] 277.7 292.5 330.7 277.6 [49,] 274.4 296.4 330.0 304.9 [50,] 258.8 305.2 331.6 294.0 [51,] 253.3 303.9 351.2 300.9 [52,] 251.0 311.5 389.4 324.0 [53,] 248.4 316.3 410.9 332.9 [54,] 249.5 316.7 442.8 341.6 [55,] 246.1 322.5 462.8 333.4 [56,] 244.5 317.1 466.9 348.2 [57,] 243.6 309.8 461.7 344.7 [58,] 244.0 303.8 439.2 344.7 [59,] 240.8 290.3 430.3 329.3 [60,] 249.8 293.7 416.1 323.5 [61,] 248.0 291.7 402.5 323.2 [62,] 259.4 296.5 397.3 317.4 [63,] 260.5 289.1 403.3 330.1 [64,] 260.8 288.5 395.9 329.2 [65,] 261.3 293.8 387.8 334.9 [66,] 259.5 297.7 378.6 315.8 [67,] 256.6 305.4 377.1 315.4 [68,] 257.9 302.7 370.4 319.6 [69,] 256.5 302.5 362.0 317.3 [70,] 254.2 303.0 350.3 313.8 [71,] 253.3 294.5 348.2 315.8 [72,] 253.8 294.1 344.6 311.3 [73,] 255.5 294.5 343.5 NA [74,] 257.1 297.1 342.8 NA [75,] 257.3 289.4 347.6 NA [76,] 253.2 292.4 346.6 NA [77,] 252.8 287.9 349.5 NA [78,] 252.0 286.6 342.1 NA [79,] 250.7 280.5 342.0 NA [80,] 252.2 272.4 342.8 NA [81,] 250.0 269.2 339.3 NA [82,] 251.0 270.6 348.2 NA [83,] 253.4 267.3 333.7 NA [84,] 251.2 262.5 334.7 NA [85,] 255.6 266.8 354.0 NA [86,] 261.1 268.8 367.7 NA [87,] 258.9 263.1 363.3 NA [88,] 259.9 261.2 358.4 NA [89,] 261.2 266.0 353.1 NA [90,] 264.7 262.5 343.1 NA [91,] 267.1 265.2 344.6 NA [92,] 266.4 261.3 344.4 NA [93,] 267.7 253.7 333.9 NA [94,] 268.6 249.2 331.7 NA [95,] 267.5 239.1 324.3 NA [96,] 268.5 236.4 321.2 NA > darr [,1] [,2] [,3] [,4] [1,] 25.2 2.0 10.0 -0.7 [2,] 19.7 0.4 1.0 -1.2 [3,] 39.3 -0.8 1.5 -7.7 [4,] 35.0 -0.8 3.7 -3.1 [5,] 19.3 0.5 1.9 5.9 [6,] -4.3 0.3 1.5 -5.9 [7,] -7.5 -5.2 -4.8 -5.1 [8,] -6.5 -1.2 -0.7 -2.1 [9,] -6.2 1.1 -7.8 -1.0 [10,] -11.6 -1.1 1.8 -2.7 [11,] -5.3 -7.8 4.7 -7.5 [12,] -5.6 20.3 5.0 2.3 [13,] -3.6 83.9 -0.1 1.0 [14,] -2.6 20.4 -1.4 -8.7 [15,] -12.0 -6.8 0.1 11.7 [16,] -5.4 -3.9 1.9 3.5 [17,] -8.6 -3.2 6.3 -7.3 [18,] -5.4 -7.3 74.3 3.9 [19,] -14.9 -13.5 113.9 -4.8 [20,] -8.4 -19.6 -2.2 -0.8 [21,] -4.4 -1.7 -0.8 -4.9 [22,] -0.9 3.6 3.2 1.0 [23,] -1.5 -0.6 -10.0 -4.4 [24,] -4.3 -3.1 1.6 16.1 [25,] -4.1 -7.9 -16.4 -7.5 [26,] -7.0 -5.6 -12.6 0.9 [27,] -3.5 -9.4 -2.4 7.5 [28,] -1.9 -9.8 -1.7 -7.1 [29,] 4.7 -1.3 -0.8 -0.6 [30,] 22.0 -3.0 -3.2 1.3 [31,] 26.6 -9.7 2.4 -2.3 [32,] 10.8 3.9 -5.5 -0.2 [33,] 4.9 6.4 -13.1 -9.4 [34,] 4.3 -12.0 -5.1 -4.6 [35,] 2.0 -3.1 -6.2 9.6 [36,] -11.9 10.1 -17.5 1.7 [37,] 5.6 0.3 1.3 -3.6 [38,] -7.0 -6.5 -4.0 7.6 [39,] -5.3 7.7 -2.3 -2.4 [40,] 2.0 -1.8 -8.3 -7.7 [41,] -2.3 -1.5 -0.6 -8.1 [42,] 6.9 6.2 -5.8 12.8 [43,] -3.1 -4.3 1.0 0.0 [44,] -11.0 0.9 -5.7 -0.4 [45,] -5.9 1.5 1.1 -3.4 [46,] -13.8 3.7 -6.1 -6.2 [47,] -9.8 3.3 2.4 -0.2 [48,] -3.3 3.9 -0.7 27.3 [49,] -15.6 8.8 1.6 -10.9 [50,] -5.5 -1.3 19.6 6.9 [51,] -2.3 7.6 38.2 23.1 [52,] -2.6 4.8 21.5 8.9 [53,] 1.1 0.4 31.9 8.7 [54,] -3.4 5.8 20.0 -8.2 [55,] -1.6 -5.4 4.1 14.8 [56,] -0.9 -7.3 -5.2 -3.5 [57,] 0.4 -6.0 -22.5 0.0 [58,] -3.2 -13.5 -8.9 -15.4 [59,] 9.0 3.4 -14.2 -5.8 [60,] -1.8 -2.0 -13.6 -0.3 [61,] 11.4 4.8 -5.2 -5.8 [62,] 1.1 -7.4 6.0 12.7 [63,] 0.3 -0.6 -7.4 -0.9 [64,] 0.5 5.3 -8.1 5.7 [65,] -1.8 3.9 -9.2 -19.1 [66,] -2.9 7.7 -1.5 -0.4 [67,] 1.3 -2.7 -6.7 4.2 [68,] -1.4 -0.2 -8.4 -2.3 [69,] -2.3 0.5 -11.7 -3.5 [70,] -0.9 -8.5 -2.1 2.0 [71,] 0.5 -0.4 -3.6 -4.5 [72,] 1.7 0.4 -1.1 NA [73,] 1.6 2.6 -0.7 NA [74,] 0.2 -7.7 4.8 NA [75,] -4.1 3.0 -1.0 NA [76,] -0.4 -4.5 2.9 NA [77,] -0.8 -1.3 -7.4 NA [78,] -1.3 -6.1 -0.1 NA [79,] 1.5 -8.1 0.8 NA [80,] -2.2 -3.2 -3.5 NA [81,] 1.0 1.4 8.9 NA [82,] 2.4 -3.3 -14.5 NA [83,] -2.2 -4.8 1.0 NA [84,] 4.4 4.3 19.3 NA [85,] 5.5 2.0 13.7 NA [86,] -2.2 -5.7 -4.4 NA [87,] 1.0 -1.9 -4.9 NA [88,] 1.3 4.8 -5.3 NA [89,] 3.5 -3.5 -10.0 NA [90,] 2.4 2.7 1.5 NA [91,] -0.7 -3.9 -0.2 NA [92,] 1.3 -7.6 -10.5 NA [93,] 0.9 -4.5 -2.2 NA [94,] -1.1 -10.1 -7.4 NA [95,] 1.0 -2.7 -3.1 NA [96,] 0.0 -1.2 1.2 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/1mze81321372986.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/2w4z21321372986.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/3dvk31321372986.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/46rzz1321372986.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,] 235.20 245.20 246.20 247.70 251.40 253.30 254.80 250.00 249.30 241.50 [2,] 245.10 257.85 258.55 258.90 260.35 261.55 262.45 257.45 256.50 253.15 [3,] 261.75 275.35 285.40 291.45 289.50 292.70 289.90 284.75 283.10 283.15 [4,] 295.45 300.95 310.20 326.00 341.95 354.55 349.45 343.15 338.85 335.25 [5,] 322.40 321.70 320.50 339.20 374.20 393.50 389.20 381.70 375.20 369.00 [,11] [,12] [,13] [,14] [,15] [,16] [,17] [,18] [,19] [,20] [,21] [1,] 243.30 248.00 253.00 252.90 251.5 251.60 253.50 259.80 297.7 292.90 285.60 [2,] 253.50 251.95 264.60 273.75 268.7 274.60 277.30 276.80 303.3 293.45 288.85 [3,] 281.25 273.60 284.90 318.75 313.1 312.95 312.00 304.05 321.5 319.90 309.15 [4,] 328.10 321.70 320.05 351.50 360.4 351.00 346.35 340.45 346.7 396.90 386.00 [5,] 357.40 352.10 346.50 360.10 380.5 373.70 369.80 366.60 359.3 448.00 445.80 [,22] [,23] [,24] [,25] [,26] [,27] [,28] [,29] [,30] [,31] [1,] 281.20 280.30 278.80 274.50 270.40 263.40 259.90 258.00 262.70 284.70 [2,] 284.20 284.25 281.30 287.20 281.40 278.35 280.35 274.85 276.55 286.05 [3,] 305.85 308.15 305.65 312.15 304.45 302.10 301.15 292.70 291.75 290.90 [4,] 384.75 388.15 382.85 382.10 369.95 360.85 354.95 350.20 349.50 348.55 [5,] 445.00 448.20 438.20 439.80 423.40 410.80 408.40 406.70 405.90 402.70 [,32] [,33] [,34] [,35] [,36] [,37] [,38] [,39] [,40] [,41] [,42] [1,] 277.7 281.60 282.50 276.00 272.90 283.00 283.30 276.8 284.50 282.70 275.0 [2,] 284.9 286.75 285.25 276.95 280.20 286.10 284.45 285.0 287.65 282.90 278.1 [3,] 301.7 307.00 307.50 304.60 310.40 305.30 306.30 306.6 302.75 299.90 297.8 [4,] 358.2 360.85 356.75 356.35 354.25 339.55 343.00 337.5 333.70 330.55 329.1 [5,] 405.1 399.60 386.50 381.40 375.20 357.70 359.00 355.0 352.70 344.40 343.8 [,43] [,44] [,45] [,46] [,47] [,48] [,49] [,50] [,51] [,52] [1,] 287.40 283.10 284.00 284.00 277.80 277.60 274.40 258.8 253.30 251.00 [2,] 287.60 285.45 285.70 284.75 282.65 277.65 285.40 276.4 277.10 281.25 [3,] 304.55 303.00 297.30 293.40 288.35 285.10 300.65 299.6 302.40 317.75 [4,] 329.65 328.60 320.25 317.85 308.75 311.60 317.45 318.4 327.55 356.70 [5,] 338.00 339.00 333.30 334.40 328.30 330.70 330.00 331.6 351.20 389.40 [,53] [,54] [,55] [,56] [,57] [,58] [,59] [,60] [,61] [,62] [1,] 248.40 249.50 246.10 244.50 243.60 244.00 240.80 249.80 248.00 259.40 [2,] 282.35 283.10 284.30 280.80 276.70 273.90 265.55 271.75 269.85 277.95 [3,] 324.60 329.15 327.95 332.65 327.25 324.25 309.80 308.60 307.45 306.95 [4,] 371.90 392.20 398.10 407.55 403.20 391.95 379.80 369.80 362.85 357.35 [5,] 410.90 442.80 462.80 466.90 461.70 439.20 430.30 416.10 402.50 397.30 [,63] [,64] [,65] [,66] [,67] [,68] [,69] [,70] [,71] [,72] [,73] [1,] 260.5 260.80 261.30 259.50 256.60 257.90 256.50 254.20 253.30 253.80 255.5 [2,] 274.8 274.65 277.55 278.60 281.00 280.30 279.50 278.60 273.90 273.95 275.0 [3,] 309.6 308.85 314.35 306.75 310.40 311.15 309.90 308.40 305.15 302.70 294.5 [4,] 366.7 362.55 361.35 347.20 346.25 345.00 339.65 332.05 332.00 327.95 319.0 [5,] 403.3 395.90 387.80 378.60 377.10 370.40 362.00 350.30 348.20 344.60 343.5 [,74] [,75] [,76] [,77] [,78] [,79] [,80] [,81] [,82] [,83] [,84] [1,] 257.10 257.30 253.2 252.80 252.00 250.70 252.2 250.00 251.0 253.40 251.20 [2,] 277.10 273.35 272.8 270.35 269.30 265.60 262.3 259.60 260.8 260.35 256.85 [3,] 297.10 289.40 292.4 287.90 286.60 280.50 272.4 269.20 270.6 267.30 262.50 [4,] 319.95 318.50 319.5 318.70 314.35 311.25 307.6 304.25 309.4 300.50 298.60 [5,] 342.80 347.60 346.6 349.50 342.10 342.00 342.8 339.30 348.2 333.70 334.70 [,85] [,86] [,87] [,88] [,89] [,90] [,91] [,92] [,93] [,94] [,95] [1,] 255.6 261.10 258.9 259.90 261.20 262.5 265.20 261.30 253.7 249.20 239.1 [2,] 261.2 264.95 261.0 260.55 263.60 263.6 266.15 263.85 260.7 258.90 253.3 [3,] 266.8 268.80 263.1 261.20 266.00 264.7 267.10 266.40 267.7 268.60 267.5 [4,] 310.4 318.25 313.2 309.80 309.55 303.9 305.85 305.40 300.8 300.15 295.9 [5,] 354.0 367.70 363.3 358.40 353.10 343.1 344.60 344.40 333.9 331.70 324.3 [,96] [1,] 236.40 [2,] 252.45 [3,] 268.50 [4,] 294.85 [5,] 321.20 $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 4 4 4 4 4 4 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 $conf [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [1,] 221.9735 241.301 244.5965 238.441 225.036 219.23 221.17 217.047 218.0435 [2,] 301.5265 309.399 326.2035 344.459 353.964 366.17 358.63 352.453 348.1565 [,10] [,11] [,12] [,13] [,14] [,15] [,16] [,17] [1,] 218.291 222.316 218.4975 241.0945 257.3275 240.657 252.594 257.4505 [2,] 348.009 340.184 328.7025 328.7055 380.1725 385.543 373.306 366.5495 [,18] [,19] [,20] [,21] [,22] [,23] [,24] [,25] [1,] 253.7665 287.214 238.1745 232.4015 226.4155 226.069 225.4255 237.179 [2,] 354.3335 355.786 401.6255 385.8985 385.2845 390.231 385.8745 387.121 [,26] [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [1,] 234.4955 236.925 242.216 233.1735 234.1195 241.525 243.793 248.461 251.015 [2,] 374.4045 367.275 360.084 352.2265 349.3805 340.275 359.607 365.539 363.985 [,35] [,36] [,37] [,38] [,39] [,40] [,41] [,42] [1,] 241.874 251.9005 263.0745 260.0455 265.125 266.3705 262.2565 257.51 [2,] 367.326 368.8995 347.5255 352.5545 348.075 339.1295 337.5435 338.09 [,43] [,44] [,45] [,46] [,47] [,48] [,49] [,50] [1,] 271.3305 268.9115 270.0055 267.251 267.731 258.2795 275.3305 266.42 [2,] 337.7695 337.0885 324.5945 319.549 308.969 311.9205 325.9695 332.78 [,51] [,52] [,53] [,54] [,55] [,56] [,57] [,58] [1,] 262.5445 258.1445 253.8555 242.961 238.048 232.5175 227.315 230.9905 [2,] 342.2555 377.3555 395.3445 415.339 417.852 432.7825 427.185 417.5095 [,59] [,60] [,61] [,62] [,63] [,64] [,65] [,66] [,67] [1,] 219.5425 231.1405 233.98 244.224 236.999 239.409 248.148 252.556 258.8525 [2,] 400.0575 386.0595 380.92 369.676 382.201 378.291 380.552 360.944 361.9475 [,68] [,69] [,70] [,71] [,72] [,73] [,74] [,75] [1,] 260.037 262.3815 266.1745 259.251 260.04 254.3626 258.0117 248.2136 [2,] 362.263 357.4185 350.6255 351.049 345.36 334.6374 336.1883 330.5864 [,76] [,77] [,78] [,79] [,80] [,81] [,82] [,83] [1,] 249.7996 243.7945 245.5048 238.8575 231.0767 228.4697 226.2664 230.6746 [2,] 335.0004 332.0055 327.6952 322.1425 313.7233 309.9303 314.9336 303.9254 [,84] [,85] [,86] [,87] [,88] [,89] [,90] [,91] [1,] 224.4151 221.9191 220.179 215.4825 216.2735 224.0838 227.9378 230.8851 [2,] 300.5849 311.6809 317.421 310.7175 306.1265 307.9162 301.4622 303.3149 [,92] [,93] [,94] [,95] [,96] [1,] 228.4975 231.1202 230.9712 228.6397 229.8222 [2,] 304.3025 304.2798 306.2288 306.3603 307.1778 $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" Warning message: In bxp(list(stats = c(235.2, 245.1, 261.75, 295.45, 322.4, 245.2, : some notches went outside hinges ('box'): maybe set notch=FALSE > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/5mceq1321372986.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,] -0.70 -1.20 -7.70 -3.10 0.5 -5.9 -7.50 -6.50 -7.80 -11.60 -7.80 -5.60 [2,] 0.65 -0.40 -4.25 -1.95 1.2 -5.1 -6.35 -4.30 -7.00 -7.15 -7.65 -1.65 [3,] 6.00 0.70 0.35 1.45 3.9 -2.0 -5.15 -1.65 -3.60 -1.90 -6.40 3.65 [4,] 17.60 10.35 20.40 19.35 12.6 0.9 -4.95 -0.95 0.05 0.35 -0.30 12.65 [5,] 25.20 19.70 39.30 35.00 19.3 1.5 -4.80 -0.70 1.10 1.80 4.70 20.30 [,13] [,14] [,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [,24] [1,] -3.60 -8.70 -12.00 -5.40 -8.60 -7.30 -14.90 -19.6 -4.90 -0.90 -10.00 -4.30 [2,] -1.85 -5.65 -9.40 -4.65 -7.95 -6.35 -14.20 -14.0 -4.65 0.05 -7.20 -3.70 [3,] 0.45 -2.00 -3.35 -1.00 -5.25 -0.75 -9.15 -5.3 -3.05 2.10 -2.95 -0.75 [4,] 42.45 9.50 5.90 2.70 1.55 39.10 54.55 -1.5 -1.25 3.40 -1.05 8.85 [5,] 83.90 20.40 11.70 3.50 6.30 74.30 113.90 -0.8 -0.80 3.60 -0.60 16.10 [,25] [,26] [,27] [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [1,] -16.40 -12.60 -9.40 -9.80 -1.30 -3.20 -9.70 -5.50 -13.10 -12.00 -6.20 [2,] -12.15 -9.80 -6.45 -8.45 -1.05 -3.10 -6.00 -2.85 -11.25 -8.55 -4.65 [3,] -7.70 -6.30 -2.95 -4.50 -0.70 -0.85 0.05 1.85 -2.25 -4.85 -0.55 [4,] -5.80 -2.35 2.55 -1.80 2.05 11.65 14.50 7.35 5.65 -0.15 5.80 [5,] -4.10 0.90 7.50 -1.70 4.70 22.00 26.60 10.80 6.40 4.30 9.60 [,36] [,37] [,38] [,39] [,40] [,41] [,42] [,43] [,44] [,45] [,46] [,47] [1,] -17.5 -3.60 -7.00 -5.30 -8.30 -8.10 -5.80 -4.30 -11.00 -5.90 -13.80 -9.80 [2,] -14.7 -1.65 -6.75 -3.85 -8.00 -5.20 0.20 -3.70 -8.35 -4.65 -10.00 -5.00 [3,] -5.1 0.80 -5.25 -2.35 -4.75 -1.90 6.55 -1.55 -3.05 -1.15 -6.15 1.10 [4,] 5.9 3.45 1.80 2.70 0.10 -1.05 9.85 0.50 0.25 1.30 -1.20 2.85 [5,] 10.1 5.60 7.60 7.70 2.00 -0.60 12.80 1.00 0.90 1.50 3.70 3.30 [,48] [,49] [,50] [,51] [,52] [,53] [,54] [,55] [,56] [,57] [,58] [,59] [1,] -3.3 -15.60 -5.50 -2.30 -2.60 0.40 -8.2 -5.40 -7.30 -22.50 -15.40 -14.2 [2,] -2.0 -13.25 -3.40 2.65 1.10 0.75 -5.8 -3.50 -6.25 -14.25 -14.45 -10.0 [3,] 1.6 -4.65 2.80 15.35 6.85 4.90 1.2 1.25 -4.35 -3.00 -11.20 -1.2 [4,] 15.6 5.20 13.25 30.65 15.20 20.30 12.9 9.45 -2.20 0.20 -6.05 6.2 [5,] 27.3 8.80 19.60 38.20 21.50 31.90 20.0 14.80 -0.90 0.40 -3.20 9.0 [,60] [,61] [,62] [,63] [,64] [,65] [,66] [,67] [,68] [,69] [,70] [,71] [1,] -13.60 -5.8 -7.40 -7.40 -8.1 -19.10 -2.90 -6.70 -8.40 -11.7 -8.50 -4.50 [2,] -7.80 -5.5 -3.15 -4.15 -3.8 -14.15 -2.20 -4.70 -5.35 -7.6 -5.30 -4.05 [3,] -1.90 -0.2 3.55 -0.75 2.9 -5.50 -0.95 -0.70 -1.85 -2.9 -1.50 -2.00 [4,] -1.05 8.1 9.35 -0.15 5.5 1.05 3.65 2.75 -0.80 -0.9 0.55 0.05 [5,] -0.30 11.4 12.70 0.30 5.7 3.90 7.70 4.20 -0.20 0.5 2.00 0.50 [,72] [,73] [,74] [,75] [,76] [,77] [,78] [,79] [,80] [,81] [,82] [,83] [1,] -1.10 -0.70 -7.70 -4.10 -4.50 -7.40 -6.1 -8.10 -3.50 1.00 -14.50 -4.8 [2,] -0.35 0.45 -3.75 -2.55 -2.45 -4.35 -3.7 -3.65 -3.35 1.20 -8.90 -3.5 [3,] 0.40 1.60 0.20 -1.00 -0.40 -1.30 -1.3 0.80 -3.20 1.40 -3.30 -2.2 [4,] 1.05 2.10 2.50 1.00 1.25 -1.05 -0.7 1.15 -2.70 5.15 -0.45 -0.6 [5,] 1.70 2.60 4.80 3.00 2.90 -0.80 -0.1 1.50 -2.20 8.90 2.40 1.0 [,84] [,85] [,86] [,87] [,88] [,89] [,90] [,91] [,92] [,93] [,94] [,95] [1,] 4.30 2.00 -5.70 -4.90 -5.30 -10.00 1.50 -3.90 -10.50 -4.50 -10.10 -3.10 [2,] 4.35 3.75 -5.05 -3.40 -2.00 -6.75 1.95 -2.30 -9.05 -3.35 -8.75 -2.90 [3,] 4.40 5.50 -4.40 -1.90 1.30 -3.50 2.40 -0.70 -7.60 -2.20 -7.40 -2.70 [4,] 11.85 9.60 -3.30 -0.45 3.05 0.00 2.55 -0.45 -3.15 -0.65 -4.25 -0.85 [5,] 19.30 13.70 -2.20 1.00 4.80 3.50 2.70 -0.20 1.30 0.90 -1.10 1.00 [,96] [1,] -1.2 [2,] -0.6 [3,] 0.0 [4,] 0.6 [5,] 1.2 $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 4 4 4 4 4 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 $conf [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [1,] -7.3905 -7.7925 -19.1235 -15.377 -5.106 -6.74 -6.256 -4.2965 -9.1695 [2,] 19.3905 9.1925 19.8235 18.277 12.906 2.74 -4.044 0.9965 1.9695 [,10] [,11] [,12] [,13] [,14] [,15] [,16] [,17] [,18] [1,] -7.825 -12.2065 -7.647 -34.547 -13.9685 -15.437 -6.8065 -12.755 -36.6555 [2,] 4.025 -0.5935 14.947 35.447 9.9685 8.737 4.8065 2.255 35.1555 [,19] [,20] [,21] [,22] [,23] [,24] [,25] [,26] [,27] [1,] -63.4625 -15.175 -5.736 -0.5465 -7.8085 -10.6645 -12.7165 -12.1855 -10.06 [2,] 45.1625 4.575 -0.364 4.7465 1.9085 9.1645 -2.6835 -0.4145 4.16 [,28] [,29] [,30] [,31] [,32] [,33] [,34] [,35] [,36] [1,] -9.7535 -3.149 -12.5025 -16.145 -6.208 -15.601 -11.486 -8.8055 -21.374 [2,] 0.7535 1.749 10.8025 16.245 9.908 11.101 1.786 7.7055 11.174 [,37] [,38] [,39] [,40] [,41] [,42] [,43] [,44] [,45] [1,] -3.229 -12.0045 -7.5245 -11.149 -5.1785 -1.0735 -4.868 -9.844 -5.8505 [2,] 4.829 1.5045 2.8245 1.649 1.3785 14.1735 1.768 3.744 3.5505 [,46] [,47] [,48] [,49] [,50] [,51] [,52] [,53] [,54] [1,] -13.102 -5.1015 -12.304 -19.2255 -10.3535 -6.77 -4.289 -10.5445 -13.573 [2,] 0.802 7.3015 15.504 9.9255 15.9535 37.47 17.989 20.3445 15.973 [,55] [,56] [,57] [,58] [,59] [,60] [,61] [,62] [,63] [1,] -8.9805 -7.5495 -14.4155 -17.836 -13.998 -7.2325 -10.944 -6.325 -3.91 [2,] 11.4805 -1.1505 8.4155 -4.564 11.598 3.4325 10.544 13.425 2.41 [,64] [,65] [,66] [,67] [,68] [,69] [,70] [,71] [,72] [1,] -4.447 -17.508 -5.5715 -6.5855 -5.4445 -8.193 -6.1215 -5.239 -0.8770988 [2,] 10.247 6.508 3.6715 5.1855 1.7445 2.393 3.1215 1.239 1.6770988 [,73] [,74] [,75] [,76] [,77] [,78] [,79] [1,] 0.09484785 -5.501334 -4.238358 -3.77519 -4.310304 -4.03664 -3.578624 [2,] 3.10515215 5.901334 2.238358 2.97519 1.710304 1.43664 5.178624 [,80] [,81] [,82] [,83] [,84] [,85] [,86] [1,] -3.792939 -2.203243 -11.008203 -4.8454189 -2.441601 0.1635515 -5.996373 [2,] -2.607061 5.003243 4.408203 0.4454189 11.241601 10.8364485 -2.803627 [,87] [,88] [,89] [,90] [,91] [,92] [,93] [1,] -4.5910296 -3.306678 -9.657441 1.852672 -2.3875948 -12.982059 -4.6629762 [2,] 0.7910296 5.906678 2.657441 2.947328 0.9875948 -2.217941 0.2629762 [,94] [,95] [,96] [1,] -11.50496 -4.5700375 -1.094656 [2,] -3.29504 -0.8299625 1.094656 $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" Warning message: In bxp(list(stats = c(-0.699999999999989, 0.650000000000006, 6, : some notches went outside hinges ('box'): maybe set notch=FALSE > dev.off() null device 1 > postscript(file="/var/wessaorg/rcomp/tmp/6xcyd1321372986.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.80 236.40 235.20 275.00 [2,] 255.25 270.10 331.65 291.05 [3,] 267.30 287.95 348.20 299.35 [4,] 315.70 303.40 398.45 317.35 [5,] 393.50 345.80 466.90 348.20 $n [1] 96 96 96 72 $conf [,1] [,2] [,3] [,4] [1,] 257.5519 282.5801 337.428 294.4528 [2,] 277.0481 293.3199 358.972 304.2472 $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/7cgyc1321372986.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,] 270.2750 261.20 266.0125 [2,] 293.8833 283.95 289.2687 [3,] 306.8750 300.90 302.9625 [4,] 318.1250 308.50 313.7688 [5,] 345.1750 332.65 338.4125 $n [1] 96 96 96 $conf [,1] [,2] [,3] [1,] 302.9658 296.9411 299.0117 [2,] 310.7842 304.8589 306.9133 $out numeric(0) $group numeric(0) $names [1] "mean" "median" "midrange" > dev.off() null device 1 > > try(system("convert tmp/1mze81321372986.ps tmp/1mze81321372986.png",intern=TRUE)) character(0) > try(system("convert tmp/2w4z21321372986.ps tmp/2w4z21321372986.png",intern=TRUE)) character(0) > try(system("convert tmp/3dvk31321372986.ps tmp/3dvk31321372986.png",intern=TRUE)) character(0) > try(system("convert tmp/46rzz1321372986.ps tmp/46rzz1321372986.png",intern=TRUE)) character(0) > try(system("convert tmp/5mceq1321372986.ps tmp/5mceq1321372986.png",intern=TRUE)) character(0) > try(system("convert tmp/6xcyd1321372986.ps tmp/6xcyd1321372986.png",intern=TRUE)) character(0) > try(system("convert tmp/7cgyc1321372986.ps tmp/7cgyc1321372986.png",intern=TRUE)) character(0) > > > proc.time() user system elapsed 1.928 0.340 2.282