R version 2.8.1 (2008-12-22)
Copyright (C) 2008 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(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)
> x <- c(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
+ ,102.18)
> par20 = ''
> par19 = ''
> par18 = ''
> par17 = ''
> par16 = ''
> par15 = ''
> par14 = ''
> par13 = ''
> par12 = ''
> par11 = ''
> par10 = ''
> par9 = ''
> par8 = ''
> par7 = ''
> par6 = ''
> par5 = ''
> par4 = ''
> par3 = ''
> par2 = '36'
> par1 = '0'
> ylab = ''
> xlab = ''
> main = ''
> #'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    -70.7116292
2    -45.1738134
3    -25.1715572
4     12.9371977
5     42.3721271
6     61.7254664
7     58.1188778
8     51.9523612
9     46.5369276
10    41.2792559
11    30.7282628
12    26.7617461
13    21.6062406
14    18.7529913
15    16.8286229
16     5.4686949
17     0.6732073
18    -7.3578398
19   -12.1711071
20   -25.7731833
21   -32.1996279
22   -35.0350074
23   -34.5837443
24   -34.8213800
25   -36.2410560
26   -23.6458443
27   -29.4012598
28   -35.1948512
29   -44.0111849
30   -42.6004439
31   -24.1386197
32    -4.2593759
33     3.8736574
34     6.5156256
35     9.4643624
36    11.1976658
37     1.0578638
38     7.7779898
39    -4.2181278
40    -7.4912331
41    -3.3576597
42    -4.3419562
43     4.1226643
44     2.6228444
45    -6.4036003
46   -10.2944853
47   -29.0550434
48   -38.0727332
49   -39.6125352
50   -53.7545934
51   -57.9744493
52   -58.8876266
53   -59.7807679
54   -56.9916890
55   -58.5959314
56   -58.4535131
57   -66.0920491
58   -70.0125352
59   -71.8079327
60   -60.7454784
61   -60.8208399
62   -55.3948454
63   -54.1881667
64   -52.0212900
65   -49.5299549
66   -49.7297748
67   -50.6562195
68   -47.7027001
69   -59.6994479
70   -59.0480047
71   -57.1032402
72   -54.3807679
73   -50.4405159
74   -46.2446683
75   -49.0494508
76   -52.5271585
77   -50.4557694
78   -48.8377195
79   -47.4707528
80   -50.5934951
81   -53.7180436
82   -52.0601918
83   -47.0643442
84   -48.6776115
85   -41.7351032
86   -34.5638041
87   -36.7104648
88   -35.1059523
89   -32.6502667
90   -26.3232820
91   -26.5724689
92   -28.2325770
93   -24.4078485
94   -22.1565853
95   -24.6256282
96   -21.0653402
97   -17.9716588
98   -18.5141671
99   -12.4424178
100   -8.2818597
101  -12.0688624
102   -7.9773473
103   -4.6903445
104  -13.1262642
105  -11.0014456
106  -15.7332129
107  -16.7976533
108  -34.5365493
109  -31.3406959
110   26.4585897
111   44.3516410
112   35.7736632
113   33.7227601
114   33.3675246
115   28.8233903
116   18.5237503
117    1.0217641
118   -2.5451126
119    4.2374677
120    6.4644525
121    5.8891810
122    0.7094870
123   -2.3124451
124   -9.1343773
125  -16.6407859
126  -15.6116350
127  -16.5491807
128  -24.4000838
129  -23.1492707
130  -19.6829341
131  -29.9227361
132  -33.2360934
133  -26.5498108
134  -23.2272486
135  -31.1851904
136  -22.3117250
137  -21.1602818
138  -20.0288747
139  -11.2685866
140  -12.9371794
141  -14.4730090
142  -20.6716530
143  -14.4291447
144  -11.2536032
145   -1.9663304
146    8.4160699
147   -4.3696668
148    6.2351157
149    9.5771739
150   10.9195021
151   19.3864689
152   16.7423345
153   10.1001863
154    3.1934176
155   -7.4084786
156   -0.8970174
157    0.3033427
158    1.5829466
159   -9.7286046
160   -7.3238221
161    0.8387222
162    7.3879091
163   17.7548759
164    3.8713954
165    5.1293372
166    8.1362859
167    2.2854729
168    4.1612845
169    6.6059590
170    7.0012665
171   -7.2061323
172   -2.1436781
173   -4.5812238
174   -3.9076684
175   -7.9274344
176  -13.3604677
177  -19.7074884
178  -17.2229219
179  -18.2648901
180  -23.0648901
181  -12.0796935
182   -6.7726548
183  -11.2991894
184  -12.0435038
185   -6.0700385
186   -2.8137228
187    5.8425029
188    2.9381705
189   -3.6661619
190   -7.2060539
191  -16.3103863
192  -18.1213974
193  -18.4679681
194   -7.6323185
195  -11.2728406
196  -10.3595733
197   -5.4149888
198   -2.6259999
199  -12.3450399
200  -16.1671521
201  -15.8892643
202  -23.1914305
203  -19.9868281
204  -14.4511785
205  -21.6303265
206  -56.6675906
207  -55.9873566
208  -54.3938552
209  -54.2007139
210  -45.6249023
211   -6.1732675
212   82.4794475
213   75.6389254
214   75.3189794
215   85.7731289
216   79.2757452
217   82.4759252
218   69.7741191
219   58.5609418
220   50.7736690
221   55.0832340
222   57.7680705
223   61.0754693
224   66.0890967
225   66.3675246
226   53.0541673
227   48.1141853
228   53.1332253
229   31.0104830
230   33.1105730
231   34.3378278
232   30.7043444
233   24.4667987
234   19.0662586
235  -14.8080111
236  -17.2395083
237  -27.4377922
238  -26.4089113
239  -18.7118034
240   -7.7597301
241  -42.2235289
242 -118.6589753
243  -81.3680960
244  -86.7463323
245  -65.3530109
246   36.3148386
247   68.2095102
248   80.9149228
249   85.9027357
250   72.2392855
251   50.2355889
252   36.4267441
253   10.3453398
254   31.9216857
255   34.9346830
256   47.9636481
257   42.6550733
258   31.6948752
259   32.3817879
260   40.6523612
261   35.1682448
262   13.8138252
263    9.7936092
264    8.3627421
265   12.4366576
266    9.6564235
267   17.0878307
268   18.9859345
269   21.7792559
270   24.9937834
271   29.4276269
272   37.6951337
273   34.2484730
274   27.4311491
275   -8.8135196
276    8.6327752
277   36.9826823
278   48.7446865
279   51.7588540
280   48.9035285
281   53.1868289
282   43.7557818
283   52.3499133
284   53.6434147
285   41.1165200
286   36.5873690
287   31.8898953
288   34.5683232
289   47.0407026
290   45.9673272
291   39.0777982
292   24.4259050
293   40.2791485
294   46.8725598
295   39.8702136
296   33.1700335
297   41.4889836
298   35.1728299
299   34.1263493
300   22.8392565
301   27.7528839
302   19.5607386
303    5.4023467
304   27.6635349
305   35.7684975
306   40.7543242
307   47.9258034
308   33.4713838
309   32.6713838
310   21.7973783
311   35.4743602
312   23.5712938
313   42.1249032
314   40.3499917
315   36.6272494
316   41.4425029
317   40.4409668
318   32.7646151
319   39.2740901
320   36.1384406
321   38.0897937
322   27.2140721
323   19.9648852
324   18.2213867
325   19.4235529
326   11.5564062
327   22.7657011
328   17.5564962
329    0.2198564
330    7.1082094
331   18.1657911
332    6.0755420
333    7.7202165
334  -10.2769814
335  -33.5989078
336  -35.1679507
337  -32.1906872
338  -67.8934778
339  -47.7475430
340  -19.5269669
341    1.5521811
342   27.6941435
343   19.6008222
344   42.8639966
345   21.9931533
346   15.3079567
347   -0.2165017
348  -33.2373421
349  -16.8065708
350  -11.8498051
351   -1.2300391
352    4.0395439
353   22.1676089
354    0.8629164
355  -10.4360876
356    0.3602101
357    0.5849386
358  -24.5708313
359  -36.4034987
> library(lattice)
> postscript(file="/var/www/rcomp/tmp/1756e1257355729.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/rcomp/tmp/2ovrt1257355729.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/rcomp/tmp/3owdk1257355729.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/rcomp/tmp/4ko7r1257355729.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/rcomp/tmp/5p74h1257355729.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/rcomp/tmp/6migm1257355729.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/rcomp/tmp/79ems1257355729.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/rcomp/tmp/8dd981257355729.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.51   86.98  172.00 
> 
> #Note: the /var/www/rcomp/createtable file can be downloaded at http://www.wessa.net/cretab
> load(file="/var/www/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/rcomp/tmp/9ru2f1257355729.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/rcomp/tmp/10c0mp1257355730.tab") 
> 
> system("convert tmp/1756e1257355729.ps tmp/1756e1257355729.png")
> system("convert tmp/2ovrt1257355729.ps tmp/2ovrt1257355729.png")
> system("convert tmp/3owdk1257355729.ps tmp/3owdk1257355729.png")
> system("convert tmp/4ko7r1257355729.ps tmp/4ko7r1257355729.png")
> system("convert tmp/5p74h1257355729.ps tmp/5p74h1257355729.png")
> system("convert tmp/6migm1257355729.ps tmp/6migm1257355729.png")
> system("convert tmp/79ems1257355729.ps tmp/79ems1257355729.png")
> system("convert tmp/8dd981257355729.ps tmp/8dd981257355729.png")
> 
> 
> proc.time()
   user  system elapsed 
  2.150   1.810   3.599