R version 2.9.0 (2009-04-17) Copyright (C) 2009 The R Foundation for Statistical Computing ISBN 3-900051-07-0 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. > y <- c(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) > x <- c(87.28 + ,87.28 + ,87.09 + ,86.92 + ,87.59 + ,90.72 + ,90.69 + ,90.3 + ,89.55 + ,88.94 + ,88.41 + ,87.82 + ,87.07 + ,86.82 + ,86.4 + ,86.02 + ,85.66 + ,85.32 + ,85 + ,84.67 + ,83.94 + ,82.83 + ,81.95 + ,81.19 + ,80.48 + ,78.86 + ,69.47 + ,68.77 + ,70.06 + ,73.95 + ,75.8 + ,77.79 + ,81.57 + ,83.07 + ,84.34 + ,85.1 + ,85.25 + ,84.26 + ,83.63 + ,86.44 + ,85.3 + ,84.1 + ,83.36 + ,82.48 + ,81.58 + ,80.47 + ,79.34 + ,82.13 + ,81.69 + ,80.7 + ,79.88 + ,79.16 + ,78.38 + ,77.42 + ,76.47 + ,75.46 + ,74.48 + ,78.27 + ,80.7 + ,79.91 + ,78.75 + ,77.78 + ,81.14 + ,81.08 + ,80.03 + ,78.91 + ,78.01 + ,76.9 + ,75.97 + ,81.93 + ,80.27 + ,78.67 + ,77.42 + ,76.16 + ,74.7 + ,76.39 + ,76.04 + ,74.65 + ,73.29 + ,71.79 + ,74.39 + ,74.91 + ,74.54 + ,73.08 + ,72.75 + ,71.32 + ,70.38 + ,70.35 + ,70.01 + ,69.36 + ,67.77 + ,69.26 + ,69.8 + ,68.38 + ,67.62 + ,68.39 + ,66.95 + ,65.21 + ,66.64 + ,63.45 + ,60.66 + ,62.34 + ,60.32 + ,58.64 + ,60.46 + ,58.59 + ,61.87 + ,61.85 + ,67.44 + ,77.06 + ,91.74 + ,93.15 + ,94.15 + ,93.11 + ,91.51 + ,89.96 + ,88.16 + ,86.98 + ,88.03 + ,86.24 + ,84.65 + ,83.23 + ,81.7 + ,80.25 + ,78.8 + ,77.51 + ,76.2 + ,75.04 + ,74 + ,75.49 + ,77.14 + ,76.15 + ,76.27 + ,78.19 + ,76.49 + ,77.31 + ,76.65 + ,74.99 + ,73.51 + ,72.07 + ,70.59 + ,71.96 + ,76.29 + ,74.86 + ,74.93 + ,71.9 + ,71.01 + ,77.47 + ,75.78 + ,76.6 + ,76.07 + ,74.57 + ,73.02 + ,72.65 + ,73.16 + ,71.53 + ,69.78 + ,67.98 + ,69.96 + ,72.16 + ,70.47 + ,68.86 + ,67.37 + ,65.87 + ,72.16 + ,71.34 + ,69.93 + ,68.44 + ,67.16 + ,66.01 + ,67.25 + ,70.91 + ,69.75 + ,68.59 + ,67.48 + ,66.31 + ,64.81 + ,66.58 + ,65.97 + ,64.7 + ,64.7 + ,60.94 + ,59.08 + ,58.42 + ,57.77 + ,57.11 + ,53.31 + ,49.96 + ,49.4 + ,48.84 + ,48.3 + ,47.74 + ,47.24 + ,46.76 + ,46.29 + ,48.9 + ,49.23 + ,48.53 + ,48.03 + ,54.34 + ,53.79 + ,53.24 + ,52.96 + ,52.17 + ,51.7 + ,58.55 + ,78.2 + ,77.03 + ,76.19 + ,77.15 + ,75.87 + ,95.47 + ,109.67 + ,112.28 + ,112.01 + ,107.93 + ,105.96 + ,105.06 + ,102.98 + ,102.2 + ,105.23 + ,101.85 + ,99.89 + ,96.23 + ,94.76 + ,91.51 + ,91.63 + ,91.54 + ,85.23 + ,87.83 + ,87.38 + ,84.44 + ,85.19 + ,84.03 + ,86.73 + ,102.52 + ,104.45 + ,106.98 + ,107.02 + ,99.26 + ,94.45 + ,113.44 + ,157.33 + ,147.38 + ,171.89 + ,171.95 + ,132.71 + ,126.02 + ,121.18 + ,115.45 + ,110.48 + ,117.85 + ,117.63 + ,124.65 + ,109.59 + ,111.27 + ,99.78 + ,98.21 + ,99.2 + ,97.97 + ,89.55 + ,87.91 + ,93.34 + ,94.42 + ,93.2 + ,90.29 + ,91.46 + ,89.98 + ,88.35 + ,88.41 + ,82.44 + ,79.89 + ,75.69 + ,75.66 + ,84.5 + ,96.73 + ,87.48 + ,82.39 + ,83.48 + ,79.31 + ,78.16 + ,72.77 + ,72.45 + ,68.46 + ,67.62 + ,68.76 + ,70.07 + ,68.55 + ,65.3 + ,58.96 + ,59.17 + ,62.37 + ,66.28 + ,55.62 + ,55.23 + ,55.85 + ,56.75 + ,50.89 + ,53.88 + ,52.95 + ,55.08 + ,53.61 + ,58.78 + ,61.85 + ,55.91 + ,53.32 + ,46.41 + ,44.57 + ,50 + ,50 + ,53.36 + ,46.23 + ,50.45 + ,49.07 + ,45.85 + ,48.45 + ,49.96 + ,46.53 + ,50.51 + ,47.58 + ,48.05 + ,46.84 + ,47.67 + ,49.16 + ,55.54 + ,55.82 + ,58.22 + ,56.19 + ,57.77 + ,63.19 + ,54.76 + ,55.74 + ,62.54 + ,61.39 + ,69.6 + ,79.23 + ,80 + ,93.68 + ,107.63 + ,100.18 + ,97.3 + ,90.45 + ,80.64 + ,80.58 + ,75.82 + ,85.59 + ,89.35 + ,89.42 + ,104.73 + ,95.32 + ,89.27 + ,90.44 + ,86.97 + ,79.98 + ,81.22 + ,87.35 + ,83.64 + ,82.22 + ,94.4) > par2 = '36' > par1 = '0' > #'GNU S' R Code compiled by R2WASP v. 1.0.44 () > #Author: Prof. Dr. P. Wessa > #To cite this work: AUTHOR(S), (YEAR), YOUR SOFTWARE TITLE (vNUMBER) in Free Statistics Software (v$_version), Office for Research Development and Education, URL http://www.wessa.net/rwasp_YOURPAGE.wasp/ > #Source of accompanying publication: Office for Research, Development, and Education > #Technical description: > par1 <- as.numeric(par1) > par2 <- as.numeric(par2) > x <- as.ts(x) > y <- as.ts(y) > mylm <- lm(y~x) > cbind(mylm$resid) [,1] 1 -46.8336292 2 -27.1336292 3 12.5253234 4 47.8464916 5 65.8807112 6 55.6674387 7 48.2241155 8 42.4609130 9 37.6778313 10 27.2302582 11 22.9315472 12 18.4461896 13 16.2631079 14 14.1354140 15 2.9288883 16 -1.7532064 17 -9.6730856 18 -14.4307493 19 -28.7261975 20 -36.5027534 21 -39.5236196 22 -38.3265805 23 -38.1640630 24 -41.0282524 25 -43.7869031 26 -47.7263595 27 -33.4865420 28 -34.0640849 29 -31.8011845 30 -17.1502675 31 5.9546673 32 12.9951107 33 10.7538423 34 12.2200056 35 11.8206906 36 -1.5151200 37 3.8014964 38 -1.3281714 39 -5.4379600 40 -8.7466807 41 -8.8929648 42 0.2741045 43 -1.4278694 44 -10.7653519 45 -14.9650499 46 -26.6680108 47 -34.3331872 48 -42.9041234 49 -57.6728646 50 -61.3025324 51 -62.0533684 52 -63.2931268 53 -60.7195318 54 -62.3058763 55 -62.1111131 56 -61.1029964 57 -58.8515565 58 -69.2117171 59 -64.8025324 60 -65.1100451 61 -51.5185448 62 -48.5859971 63 -54.6337912 64 -54.0204377 65 -53.8367521 66 -54.6208207 67 -51.6205187 68 -50.9234796 69 -51.4665009 70 -63.6262785 71 -59.9901659 72 -55.2674068 73 -51.3058763 74 -48.7254535 75 -50.0671858 76 -53.6599751 77 -53.7987466 78 -52.4727246 79 -48.4033794 80 -47.7695427 81 -51.6815263 82 -50.2639230 83 -51.7649099 84 -44.6066422 85 -38.4831982 86 -37.9816072 87 -35.2057363 88 -33.8490595 89 -29.7067232 90 -26.0787273 91 -23.7748605 92 -25.2898049 93 -25.4099861 94 -23.8272874 95 -21.3914768 96 -22.8461796 97 -18.1256965 98 -14.4384459 99 -17.9400369 100 -12.7134109 101 -6.9424748 102 -9.8163718 103 -11.2001385 104 -9.2262414 105 -11.5646299 106 -9.1317802 107 -23.1284363 108 -2.7906518 109 70.5485836 110 72.7742445 111 38.2404298 112 31.6766233 113 26.5873989 114 21.2521923 115 10.7749514 116 -5.8967507 117 -4.1961467 118 1.6331381 119 -0.9505476 120 -0.6688358 121 -5.5649690 122 -8.4822703 123 -14.9917569 124 -22.0523814 125 -20.6130060 126 -21.1759065 127 -28.4010225 128 -22.3095221 129 -13.9447287 130 -28.7596731 131 -34.9768935 132 -23.0065613 133 -22.9332682 134 -33.0605791 135 -22.1488976 136 -25.4980616 137 -25.7511735 138 -16.4150609 139 -17.9190088 140 -14.2985256 141 -10.0024734 142 -8.8907109 143 -13.7710527 144 -7.1694617 145 1.4982925 146 5.9226426 147 15.2040523 148 7.7996625 149 11.3924518 150 15.6432877 151 11.2445767 152 6.7784133 153 3.7067112 154 -9.0942757 155 -6.6577802 156 -5.5783444 157 2.5277984 158 -1.4715976 159 -5.8122620 160 -4.6685558 161 2.4242335 162 13.1658849 163 13.2808293 164 15.9146659 165 4.5314442 166 -2.4193917 167 -0.1555853 168 3.0593591 169 8.0775664 170 2.5501745 171 3.2075362 172 -8.2070252 173 -7.3155249 174 -11.2240245 175 -17.2269854 176 -18.2165928 177 -13.9827562 178 -20.6266834 179 -24.2742565 180 -17.5749415 181 -15.5749415 182 -14.1714576 183 -12.5575002 184 -6.5106120 185 -8.7826161 186 -4.8357280 187 -1.5566752 188 -2.8277733 189 -6.2698076 190 -15.3118419 191 -16.9916607 192 -17.1336951 193 -6.1890828 194 -4.2822551 195 -1.8943196 196 -3.1251954 197 -1.8486395 198 0.9738176 199 -2.8815701 200 -15.5025763 201 -22.2635029 202 -19.4244295 203 -14.1954466 204 -7.7029593 205 -6.9150238 206 -21.2562112 207 -58.2794714 208 -54.1690788 209 -46.2821302 210 26.2042143 211 142.5224216 212 103.2936227 213 75.6666357 214 73.9357599 215 64.4458505 216 73.7538862 217 61.0756583 218 50.1759603 219 51.7055471 220 51.4791422 221 44.9547922 222 48.1403708 223 54.2432506 224 55.6578121 225 45.3349720 226 46.3749514 227 39.9482445 228 22.6182747 229 35.8392809 230 26.9272973 231 25.4774483 232 22.7317682 233 20.7148498 234 17.1063502 235 13.0054442 236 -22.5254096 237 -25.0716128 238 -35.9513506 239 -33.6269196 240 -19.6665380 241 -8.9793684 242 -25.2557404 243 -69.9738009 244 -29.6760178 245 -44.0809087 246 -24.1942621 247 54.0389047 248 61.4778162 249 48.1216624 250 50.0469184 251 45.2363639 252 17.7127798 253 12.9284092 254 5.6660536 255 26.7177736 256 15.4438766 257 27.9510653 258 29.4171477 259 20.8468155 260 14.7705616 261 18.9778313 262 19.9761594 263 6.1176707 264 2.9773083 265 4.5821621 266 14.8798052 267 11.6694126 268 17.3654648 269 13.0449006 270 12.8315472 271 24.9102170 272 26.2277394 273 43.0624820 274 28.6191587 275 12.9184147 276 9.1131999 277 40.2885259 278 45.5046783 279 38.5454236 280 41.1234895 281 33.2960976 282 44.9790173 283 45.3835691 284 42.4215746 285 41.8085232 286 32.2548073 287 26.6799233 288 30.7515444 289 36.1915239 290 46.9692068 291 38.8724696 292 29.7269515 293 28.2400839 294 42.4792164 295 38.1160139 296 34.8446948 297 32.1443928 298 40.5152480 299 27.3664669 300 31.4234456 301 28.3993976 302 22.4765575 303 24.4092672 304 22.1093482 305 26.0313413 306 34.8244326 307 43.0789734 308 45.7551464 309 30.5966577 310 31.5966577 311 20.8488636 312 50.4190338 313 34.9465067 314 38.4536364 315 52.0369391 316 40.0249556 317 36.5722267 318 44.3522665 319 34.5331533 320 39.8685808 321 29.5806454 322 27.2666069 323 35.2985506 324 34.1836062 325 18.5303543 326 25.6013715 327 18.6672329 328 14.8023585 329 3.7173839 330 6.2777874 331 22.2039494 332 19.9525095 333 3.7057833 334 -0.3216086 335 -16.0321412 336 -6.9253725 337 -19.2800753 338 -38.2246656 339 -41.4793465 340 -18.5046244 341 -4.3636581 342 0.3775293 343 33.7108210 344 30.3241745 345 39.3168828 346 5.4591601 347 -7.4443238 348 -7.8765695 349 -42.6005956 350 -12.1229937 351 -1.5931858 352 1.8964216 353 -10.6479696 354 2.1577092 355 4.0150709 356 -9.8658749 357 -6.3568523 358 -1.6741536 359 -29.1849072 > library(lattice) > postscript(file="/var/www/html/rcomp/tmp/1561w1256915370.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > plot(y,type='l',main='Run Sequence Plot of Y[t]',xlab='time or index',ylab='value') > grid() > dev.off() null device 1 > postscript(file="/var/www/html/rcomp/tmp/2b37m1256915370.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > plot(x,type='l',main='Run Sequence Plot of X[t]',xlab='time or index',ylab='value') > grid() > dev.off() null device 1 > postscript(file="/var/www/html/rcomp/tmp/3qdep1256915370.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > plot(x,y,main='Scatter Plot',xlab='X[t]',ylab='Y[t]') > grid() > dev.off() null device 1 > postscript(file="/var/www/html/rcomp/tmp/4nam21256915370.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > plot(mylm$resid,type='l',main='Run Sequence Plot of e[t]',xlab='time or index',ylab='value') > grid() > dev.off() null device 1 > postscript(file="/var/www/html/rcomp/tmp/57lby1256915370.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > hist(mylm$resid,main='Histogram of e[t]') > dev.off() null device 1 > postscript(file="/var/www/html/rcomp/tmp/6dip41256915370.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > if (par1 > 0) + { + densityplot(~mylm$resid,col='black',main=paste('Density Plot of e[t] bw = ',par1),bw=par1) + } else { + densityplot(~mylm$resid,col='black',main='Density Plot of e[t]') + } > dev.off() null device 1 > postscript(file="/var/www/html/rcomp/tmp/7hz1m1256915370.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) > qqnorm(mylm$resid,main='QQ plot of e[t]') > qqline(mylm$resid) > grid() > dev.off() null device 1 > if (par2 > 0) + { + postscript(file="/var/www/html/rcomp/tmp/87sup1256915370.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) + acf(mylm$resid,lag.max=par2,main='Residual Autocorrelation Function') + grid() + dev.off() + } null device 1 > summary(x) Min. 1st Qu. Median Mean 3rd Qu. Max. 44.57 66.80 76.65 77.47 86.98 172.00 > > #Note: the /var/www/html/rcomp/createtable file can be downloaded at http://www.wessa.net/cretab > load(file="/var/www/html/rcomp/createtable") > > a<-table.start() > a<-table.row.start(a) > a<-table.element(a,'Model: Y[t] = c + b X[t] + e[t]',2,TRUE) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'c',1,TRUE) > a<-table.element(a,mylm$coeff[[1]]) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'b',1,TRUE) > a<-table.element(a,mylm$coeff[[2]]) > a<-table.row.end(a) > a<-table.end(a) > table.save(a,file="/var/www/html/rcomp/tmp/934061256915370.tab") > a<-table.start() > a<-table.row.start(a) > a<-table.element(a,'Descriptive Statistics about e[t]',2,TRUE) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'# observations',header=TRUE) > a<-table.element(a,length(mylm$resid)) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'minimum',header=TRUE) > a<-table.element(a,min(mylm$resid)) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'Q1',header=TRUE) > a<-table.element(a,quantile(mylm$resid,0.25)) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'median',header=TRUE) > a<-table.element(a,median(mylm$resid)) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'mean',header=TRUE) > a<-table.element(a,mean(mylm$resid)) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'Q3',header=TRUE) > a<-table.element(a,quantile(mylm$resid,0.75)) > a<-table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,'maximum',header=TRUE) > a<-table.element(a,max(mylm$resid)) > a<-table.row.end(a) > a<-table.end(a) > table.save(a,file="/var/www/html/rcomp/tmp/10fp431256915370.tab") > > system("convert tmp/1561w1256915370.ps tmp/1561w1256915370.png") > system("convert tmp/2b37m1256915370.ps tmp/2b37m1256915370.png") > system("convert tmp/3qdep1256915370.ps tmp/3qdep1256915370.png") > system("convert tmp/4nam21256915370.ps tmp/4nam21256915370.png") > system("convert tmp/57lby1256915370.ps tmp/57lby1256915370.png") > system("convert tmp/6dip41256915370.ps tmp/6dip41256915370.png") > system("convert tmp/7hz1m1256915370.ps tmp/7hz1m1256915370.png") > system("convert tmp/87sup1256915370.ps tmp/87sup1256915370.png") > > > proc.time() user system elapsed 1.790 1.266 2.417