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(0.122359934
+ ,0.931905548
+ ,-0.055775589
+ ,1.468985837
+ ,1.055123159
+ ,0.944996502
+ ,1.068458953
+ ,0.316141818
+ ,0.760538937
+ ,-2.20217258
+ ,-0.131541265
+ ,-0.532224765
+ ,-1.741321669
+ ,0.204726282
+ ,-0.147865278
+ ,1.396025769
+ ,0.162345476
+ ,0.015665853
+ ,0.217672981
+ ,-0.917486426
+ ,-0.903483082
+ ,0.37057944
+ ,-1.528186024
+ ,1.425442977
+ ,0.823776349
+ ,1.16416148
+ ,0.548322968
+ ,-0.145197568
+ ,0.144016721
+ ,-0.008729414
+ ,-0.044488825
+ ,2.265085141
+ ,-2.30024615
+ ,-0.802974595
+ ,1.905081291
+ ,0.141275448
+ ,-0.274557318
+ ,-1.089390275
+ ,-0.106056668
+ ,0.153839662
+ ,1.378581549
+ ,0.984071836
+ ,-1.093840675
+ ,-2.335855288
+ ,0.019620673
+ ,-0.773231639
+ ,0.531269746
+ ,-3.130460456
+ ,-1.063832741
+ ,1.864410977
+ ,-1.765416679
+ ,-0.680077954
+ ,-0.465236897
+ ,2.087199736
+ ,-3.08370281
+ ,-0.865874128
+ ,0.852274105
+ ,-2.170886194
+ ,-0.42542584
+ ,-6.885803565
+ ,0.797287754
+ ,2.743745431
+ ,-1.351253289
+ ,2.723775248
+ ,-0.265752017
+ ,0.628595851
+ ,1.685366026
+ ,-3.512413068
+ ,0.213871684
+ ,3.188286472
+ ,0.271504185
+ ,-0.398480607
+ ,-0.968286123
+ ,-0.812342823
+ ,1.714817333
+ ,-2.910379004
+ ,-0.863810554
+ ,-0.211153485
+ ,-1.471741777
+ ,1.321517564
+ ,0.2632073
+ ,-3.586108009
+ ,3.524638387
+ ,2.073869999
+ ,-1.349714486
+ ,0.647566188
+ ,1.610373405
+ ,-0.205131216
+ ,3.117976023
+ ,1.983811507
+ ,-0.574764692
+ ,2.005568836
+ ,1.261019639
+ ,-0.024939629
+ ,-0.237549844
+ ,0.211769735
+ ,-0.068297898
+ ,0.020923687
+ ,-0.049292778
+ ,-0.046741439
+ ,-0.199106019
+ ,-1.867970158
+ ,-1.910721422
+ ,1.572336912
+ ,0.278963542
+ ,-3.002324916
+ ,-0.429296011
+ ,-0.360255949
+ ,-1.54444216
+ ,2.074267337
+ ,2.268283466
+ ,0.470843123
+ ,0.612020641
+ ,0.088859022
+ ,-0.741154231
+ ,-1.702438454
+ ,-0.701120629
+ ,0.848785545
+ ,-3.118553809
+ ,-0.340791363
+ ,-2.084450156
+ ,-2.657138582
+ ,2.483969208
+ ,1.092183998
+ ,0.214914883
+ ,-2.252556302
+ ,0.081923776
+ ,-1.090016937
+ ,0.091750747
+ ,-0.302970612
+ ,3.266721419
+ ,0.272181497
+ ,-1.509282405
+ ,3.118010252
+ ,0.709336134
+ ,0.797929557
+ ,0.024987012
+ ,-0.510022678
+ ,1.672039447
+ ,1.17811794
+ ,-0.195060587
+ ,2.003888686
+ ,-1.991462706
+ ,-3.780993951
+ ,-2.94306251
+ ,-2.755028972
+ ,-1.547870074
+ ,-1.464063034
+ ,-0.355532874
+ ,2.484192802
+ ,0.128414605
+ ,-0.645552653
+ ,0.493284806
+ ,2.155227331
+ ,0.842823637
+ ,-3.609266334
+ ,-3.02895622
+ ,0.253120657
+ ,0.469936281
+ ,-2.414708957
+ ,-0.332056481
+ ,0.021684517
+ ,-0.723477195
+ ,-4.492503369
+ ,1.736091775
+ ,0.568687819
+ ,-2.86646043
+ ,-7.457541952
+ ,-0.113160554
+ ,2.050205993
+ ,5.688886915
+ ,-2.789870757
+ ,1.853018343
+ ,0.587478284
+ ,1.425740928
+ ,0.245486658
+ ,2.215449812
+ ,0.30622077
+ ,-4.486786168
+ ,-1.245225426
+ ,-2.081228135
+ ,-0.102782372
+ ,-0.231228849
+ ,-1.155245505
+ ,3.839469939
+ ,0.756141264
+ ,-0.334519186
+ ,1.501938513
+ ,-3.503251683
+ ,2.545822843
+ ,-0.249882715
+ ,1.826897295
+ ,1.183288155
+ ,2.178453894
+ ,0.982882224
+ ,0.192963833
+ ,-4.748270493
+ ,-1.546278111
+ ,-0.957344137
+ ,2.771841656
+ ,0.988637626
+ ,0.046130644
+ ,0.058911763
+ ,-1.613053267
+ ,-2.827962948
+ ,-0.409646709
+ ,-3.472100215
+ ,-2.67352482
+ ,3.739603344
+ ,0.940575248
+ ,2.715238152
+ ,1.590584938
+ ,-1.901196912
+ ,2.168241623
+ ,-3.291258516
+ ,2.431989331
+ ,1.379624088
+ ,1.660957909
+ ,0.803376279
+ ,0.635350876
+ ,-1.935088352
+ ,-1.364117462
+ ,-1.288076636
+ ,2.763030557
+ ,-1.850948021
+ ,-0.426026229
+ ,1.416557529
+ ,1.054518042
+ ,0.100735979
+ ,3.01821026
+ ,-0.582956862
+ ,-0.465121784
+ ,-1.278449674
+ ,3.852168919
+ ,1.516127833
+ ,0.679014194
+ ,-1.187703382
+ ,1.025403734
+ ,0.921134292
+ ,0.473279558
+ ,1.218773055
+ ,-1.967712268
+ ,-0.284285615
+ ,-0.739335622
+ ,0.177297096
+ ,0.617738343
+ ,1.963704879
+ ,1.770795897
+ ,0.862954668
+ ,0.736632082
+ ,-1.57670801
+ ,-0.757226618
+ ,0.459526319
+ ,-2.740544672
+ ,0.642873603
+ ,-1.942390074
+ ,0.969546937
+ ,2.916260999
+ ,2.804886635
+ ,-1.177267984
+ ,1.442031421
+ ,-1.008279712
+ ,1.685048733
+ ,-3.575122053
+ ,-3.36169991
+ ,0.544584549
+ ,-3.812968258
+ ,-0.255478375
+ ,2.36107515
+ ,0.231398527
+ ,0.961587017
+ ,-2.766406177
+ ,-1.889330686
+ ,-1.722863291
+ ,-0.492311851
+ ,-0.378296018
+ ,-0.661148328
+ ,-0.391163065
+ ,-0.147328808
+ ,-0.155178326
+ ,-1.410346167
+ ,-1.656752775
+ ,-0.498316342
+ ,0.635940123
+ ,-2.533052084
+ ,0.066688919
+ ,0.010332456
+ ,0.100325395
+ ,-0.159212102
+ ,-1.118768301
+ ,-0.360506506
+ ,-0.794671339
+ ,-1.82637031
+ ,0.020284413
+ ,2.059692348
+ ,1.01468765
+ ,3.219689867
+ ,-2.433588329
+ ,-2.372306799
+ ,-0.37056341
+ ,1.266050442
+ ,0.824592148
+ ,-1.852999286
+ ,-3.161642025
+ ,0.442927211
+ ,-0.428942112
+ ,-1.310961025
+ ,1.014820082
+ ,-0.305111502
+ ,0.018050147
+ ,-2.696506438
+ ,-1.10764417
+ ,1.141463332
+ ,0.159323081
+ ,-2.055277082
+ ,0.202725995
+ ,-0.3671714
+ ,-0.056145558
+ ,-0.897022272
+ ,-0.261083776
+ ,-0.651847454
+ ,-0.339317343
+ ,3.954885606
+ ,-2.972657905
+ ,0.291575514
+ ,0.387896939
+ ,0.061920658
+ ,-4.019270705
+ ,2.799936975
+ ,-0.961852566
+ ,-0.689420887
+ ,-0.528085855
+ ,0.088821319
+ ,-3.596177355
+ ,-1.464790191
+ ,0.759085451
+ ,-3.392063692
+ ,2.383755557
+ ,3.773197159
+ ,0.17271416
+ ,-1.373664483
+ ,-0.554515625
+ ,-0.616708159
+ ,0.338243237
+ ,-4.969501265
+ ,-1.459226067
+ ,-3.458393406
+ ,-0.708571911
+ ,-0.967100647
+ ,-2.764883729
+ ,-6.358399349
+ ,-1.216802997
+ ,-7.378604269
+ ,6.326253049
+ ,2.244553469
+ ,1.064937768
+ ,-5.865037234
+ ,-2.548316402
+ ,1.936100071
+ ,-0.678052689
+ ,-0.197814711
+ ,-2.763460164
+ ,-0.426954939
+ ,-6.333456722
+ ,2.598460922
+ ,0.687911291
+ ,5.047098676
+ ,-1.221070779
+ ,-1.439614033
+ ,8.787590818
+ ,-2.386724461
+ ,0.539774275
+ ,0.369474032
+ ,-2.149167875
+ ,0.01933409
+ ,1.016870414
+ ,-5.485951805
+ ,0.506223899
+ ,-1.934614759
+ ,-0.521110536
+ ,0.055716282
+ ,-3.494650335
+ ,-0.275822553
+ ,2.610696262
+ ,-0.486156759
+ ,-0.247611741
+ ,1.077841547
+ ,1.091540085
+ ,-3.133113963
+ ,-0.451612277
+ ,0.819605096
+ ,-0.476518511
+ ,-0.344000554
+ ,2.175325119
+ ,0.390570472)
> x <- c(0.358589807
+ ,4.214511881
+ ,0.420547929
+ ,3.033704781
+ ,-0.56052437
+ ,-2.838342909
+ ,-3.59195797
+ ,-6.503810163
+ ,5.033758581
+ ,1.822352229
+ ,-1.643968707
+ ,4.637069866
+ ,2.605785323
+ ,2.374789523
+ ,-0.774121623
+ ,-0.18761552
+ ,-5.476045205
+ ,1.447158493
+ ,-5.204314911
+ ,-2.825441851
+ ,-2.981766221
+ ,3.477155845
+ ,-0.074804163
+ ,-0.747083419
+ ,0.087556846
+ ,1.717535987
+ ,0.265092469
+ ,0.981838958
+ ,0.684387041
+ ,0.745580981
+ ,-7.057264511
+ ,-1.339602775
+ ,6.03224455
+ ,3.333000547
+ ,0.387430727
+ ,-0.492571244
+ ,-1.114554463
+ ,0.986362193
+ ,-4.178129754
+ ,0.909776697
+ ,-7.566372304
+ ,3.040076348
+ ,-8.618545405
+ ,-4.975483225
+ ,0.269474159
+ ,-3.502271034
+ ,1.756026214
+ ,1.961162274
+ ,-10.19663213
+ ,3.866961067
+ ,2.959241025
+ ,5.786212324
+ ,-6.26689154
+ ,-0.665419672
+ ,0.355327246
+ ,-4.465315313
+ ,-3.636530751
+ ,0.916132779
+ ,5.892284803
+ ,2.819396501
+ ,1.358031711
+ ,3.472312894
+ ,-0.798747936
+ ,2.201569021
+ ,-2.740539939
+ ,-8.425176128
+ ,4.576725209
+ ,-0.163276651
+ ,5.096224222
+ ,1.272592869
+ ,5.100785917
+ ,-4.457886388
+ ,-0.340800482
+ ,-8.220223643
+ ,-2.805502328
+ ,2.246491982
+ ,0.143995451
+ ,3.294160473
+ ,1.000168003
+ ,-1.032622833
+ ,9.151328623
+ ,1.90221947
+ ,-3.883571884
+ ,-0.163667593
+ ,-1.799971377
+ ,-0.773225401
+ ,1.292136516
+ ,1.430141163
+ ,-2.042196108
+ ,3.366728864
+ ,2.244260398
+ ,-0.331813788
+ ,0.865535035
+ ,3.650254091
+ ,1.90654942
+ ,2.797597632
+ ,-1.73372425
+ ,-3.761268377
+ ,2.152813415
+ ,-3.723793261
+ ,-1.190889523
+ ,-0.97549975
+ ,-1.917168484
+ ,-8.371650271
+ ,1.29636821
+ ,0.862891059
+ ,0.45714904
+ ,-2.135685819
+ ,2.370873598
+ ,1.420567252
+ ,1.11247933
+ ,0.750168076
+ ,-7.550796046
+ ,-2.09736341
+ ,-3.029848055
+ ,2.222742419
+ ,-11.39124599
+ ,-3.448975351
+ ,-6.991908479
+ ,-2.137404059
+ ,6.27314404
+ ,-1.787735714
+ ,-3.374998736
+ ,0.043628003
+ ,-5.666504925
+ ,-2.686506291
+ ,-7.06566099
+ ,-1.646318617
+ ,4.993320585
+ ,-5.827222717
+ ,2.661738145
+ ,10.7248933
+ ,3.431334526
+ ,5.392091551
+ ,-0.718006171
+ ,-4.146751437
+ ,5.332315454
+ ,6.684877836
+ ,1.503336896
+ ,1.35993339
+ ,-7.866389577
+ ,0.524195986
+ ,1.220770483
+ ,0.559816644
+ ,-3.548850602
+ ,0.128191337
+ ,0.074370732
+ ,3.106940383
+ ,5.515200278
+ ,-4.139564796
+ ,-3.087731061
+ ,-1.970674609
+ ,-6.731845195
+ ,-1.35644177
+ ,-9.693524485
+ ,-0.294281856
+ ,-5.999112686
+ ,4.007826455
+ ,1.198314989
+ ,-4.129254019
+ ,-0.073248977
+ ,-7.642882768
+ ,-0.295355602
+ ,-9.561506792
+ ,-1.976380846
+ ,0.508446603
+ ,-3.818072105
+ ,5.882141871
+ ,1.580746623
+ ,-2.665063328
+ ,1.734601575
+ ,2.581488384
+ ,-0.660619869
+ ,3.902118748
+ ,4.439133346
+ ,-1.301320618
+ ,-6.604744216
+ ,-4.582537935
+ ,3.80404284
+ ,0.808798701
+ ,2.595458525
+ ,0.247289549
+ ,4.887764022
+ ,-4.001119943
+ ,-1.927549528
+ ,-0.564184003
+ ,-1.558046047
+ ,3.972283676
+ ,-5.519802454
+ ,0.82316399
+ ,3.427488076
+ ,2.74903243
+ ,-3.860963592
+ ,-4.58611395
+ ,-9.451774044
+ ,-2.802976135
+ ,-2.752721635
+ ,0.957363779
+ ,-7.556242767
+ ,-3.96799907
+ ,-1.639954959
+ ,0.035474496
+ ,0.093061831
+ ,0.037236475
+ ,0.744184164
+ ,-11.0956289
+ ,9.414640904
+ ,-5.909305325
+ ,9.372040194
+ ,3.247696555
+ ,2.859199301
+ ,-4.966832825
+ ,-4.749458918
+ ,-3.292214504
+ ,12.68155326
+ ,2.8534252
+ ,2.041548827
+ ,-1.886714277
+ ,0.742218458
+ ,-1.20572167
+ ,-3.501715932
+ ,0.372089171
+ ,-6.273171509
+ ,-2.237638513
+ ,0.92103917
+ ,4.644240063
+ ,2.009379362
+ ,8.699163619
+ ,-1.502056368
+ ,-3.219268656
+ ,0.304121669
+ ,4.75949758
+ ,4.256396557
+ ,1.074037275
+ ,-0.766333759
+ ,-0.223483754
+ ,8.589799811
+ ,-0.301460196
+ ,1.607870846
+ ,-2.235564155
+ ,0.715144187
+ ,-2.09909075
+ ,1.594136105
+ ,0.486504166
+ ,1.991971338
+ ,3.319154359
+ ,0.434992231
+ ,1.162593872
+ ,-4.52972192
+ ,-8.078465542
+ ,-0.823293999
+ ,-4.901134696
+ ,-0.751130487
+ ,1.527788823
+ ,4.05085425
+ ,4.2824586
+ ,1.640060334
+ ,-2.101083111
+ ,-1.214666919
+ ,-0.637682257
+ ,3.978448436
+ ,-10.72567317
+ ,-2.101259655
+ ,1.713390308
+ ,-3.88710559
+ ,1.583213838
+ ,5.524375994
+ ,1.873810753
+ ,-3.052256271
+ ,-3.897953357
+ ,-0.113383516
+ ,-7.863392352
+ ,1.35133195
+ ,-3.598381738
+ ,2.121311848
+ ,-10.88682204
+ ,-2.919019597
+ ,-1.397866414
+ ,1.201275948
+ ,-6.937555068
+ ,1.17353998
+ ,-0.076365731
+ ,-1.292450094
+ ,3.264912799
+ ,-5.68478447
+ ,0.019122498
+ ,-5.278888259
+ ,-2.312827397
+ ,-5.325033478
+ ,7.10070413
+ ,3.182965683
+ ,2.189477739
+ ,0.362991691
+ ,3.340000229
+ ,3.607943398
+ ,-4.729776906
+ ,0.120200269
+ ,-6.316271831
+ ,6.823797583
+ ,6.542616296
+ ,-1.768356553
+ ,-1.649476676
+ ,-4.447415993
+ ,7.304278393
+ ,4.086279897
+ ,-1.995853872
+ ,10.55148248
+ ,4.342309702
+ ,0.820747831
+ ,-0.02219925
+ ,0.779630544
+ ,4.577799942
+ ,-2.959278774
+ ,-2.907498454
+ ,0.388597756
+ ,-1.288827183
+ ,3.788144408
+ ,-4.005747329
+ ,2.955089726
+ ,1.431933215
+ ,4.746211331
+ ,-2.89379125
+ ,1.945065692
+ ,-1.090372906
+ ,0.548505612
+ ,-7.153270644
+ ,1.910464401
+ ,5.70114848
+ ,-6.495441014
+ ,2.451315442
+ ,6.05434482
+ ,-1.301082342
+ ,-14.12580881
+ ,1.600115691
+ ,-14.45720158
+ ,5.189001697
+ ,11.41150416
+ ,-9.741078015
+ ,-8.033645437
+ ,-3.083064113
+ ,4.63268051
+ ,2.180441382
+ ,-19.31722406
+ ,14.55493563
+ ,1.753334117
+ ,-5.143655248
+ ,-6.606571354
+ ,-6.873940749
+ ,-18.09612055
+ ,-6.553098356
+ ,-19.83898763
+ ,-5.613221572
+ ,19.76716126
+ ,5.539571391
+ ,-17.73727592
+ ,5.112775749
+ ,-1.170409363
+ ,15.46394847
+ ,-3.104504085
+ ,-9.306840473
+ ,-1.143217009
+ ,-5.15672845
+ ,-4.144767241
+ ,16.24951853
+ ,-0.420879069
+ ,9.561730297
+ ,0.966510929
+ ,5.538032148
+ ,6.959315205
+ ,-12.08226563
+ ,-10.02744433
+ ,2.338430654
+ ,-2.161762843
+ ,-0.27772769
+ ,-12.64200255
+ ,11.17846411
+ ,-9.623626657
+ ,-5.570543494
+ ,-1.2993576
+ ,-12.88991529
+ ,-15.83247655
+ ,7.479555319
+ ,9.995240341
+ ,2.868494632
+ ,9.339104123
+ ,2.234894013
+ ,7.254333611
+ ,-17.90490929
+ ,1.605067053
+ ,3.881734698
+ ,-4.591986798
+ ,6.65707929
+ ,5.74510677
+ ,-2.04022682
+ ,-2.024511127)
> par7 = '0'
> par6 = '0'
> par5 = '1'
> par4 = '1'
> par3 = '0'
> par2 = '0'
> par1 = '1'
> #'GNU S' R Code compiled by R2WASP v. 1.0.44 ()
> #Author: Prof. Dr. P. Wessa
> #To cite this work: Wessa P., (2008), Cross Correlation Function (v1.0.6) in Free Statistics Software (v$_version), Office for Research Development and Education, URL http://www.wessa.net/rwasp_cross.wasp#output/
> #Source of accompanying publication: Office for Research, Development, and Education
> #Technical description: 
> par1 <- as.numeric(par1)
> par2 <- as.numeric(par2)
> par3 <- as.numeric(par3)
> par4 <- as.numeric(par4)
> par5 <- as.numeric(par5)
> par6 <- as.numeric(par6)
> par7 <- as.numeric(par7)
> if (par1 == 0) {
+ x <- log(x)
+ } else {
+ x <- (x ^ par1 - 1) / par1
+ }
> if (par5 == 0) {
+ y <- log(y)
+ } else {
+ y <- (y ^ par5 - 1) / par5
+ }
> if (par2 > 0) x <- diff(x,lag=1,difference=par2)
> if (par6 > 0) y <- diff(y,lag=1,difference=par6)
> if (par3 > 0) x <- diff(x,lag=par4,difference=par3)
> if (par7 > 0) y <- diff(y,lag=par4,difference=par7)
> x
  [1]  -0.641410193   3.214511881  -0.579452071   2.033704781  -1.560524370
  [6]  -3.838342909  -4.591957970  -7.503810163   4.033758581   0.822352229
 [11]  -2.643968707   3.637069866   1.605785323   1.374789523  -1.774121623
 [16]  -1.187615520  -6.476045205   0.447158493  -6.204314911  -3.825441851
 [21]  -3.981766221   2.477155845  -1.074804163  -1.747083419  -0.912443154
 [26]   0.717535987  -0.734907531  -0.018161042  -0.315612959  -0.254419019
 [31]  -8.057264511  -2.339602775   5.032244550   2.333000547  -0.612569273
 [36]  -1.492571244  -2.114554463  -0.013637807  -5.178129754  -0.090223303
 [41]  -8.566372304   2.040076348  -9.618545405  -5.975483225  -0.730525841
 [46]  -4.502271034   0.756026214   0.961162274 -11.196632130   2.866961067
 [51]   1.959241025   4.786212324  -7.266891540  -1.665419672  -0.644672754
 [56]  -5.465315313  -4.636530751  -0.083867221   4.892284803   1.819396501
 [61]   0.358031711   2.472312894  -1.798747936   1.201569021  -3.740539939
 [66]  -9.425176128   3.576725209  -1.163276651   4.096224222   0.272592869
 [71]   4.100785917  -5.457886388  -1.340800482  -9.220223643  -3.805502328
 [76]   1.246491982  -0.856004549   2.294160473   0.000168003  -2.032622833
 [81]   8.151328623   0.902219470  -4.883571884  -1.163667593  -2.799971377
 [86]  -1.773225401   0.292136516   0.430141163  -3.042196108   2.366728864
 [91]   1.244260398  -1.331813788  -0.134464965   2.650254091   0.906549420
 [96]   1.797597632  -2.733724250  -4.761268377   1.152813415  -4.723793261
[101]  -2.190889523  -1.975499750  -2.917168484  -9.371650271   0.296368210
[106]  -0.137108941  -0.542850960  -3.135685819   1.370873598   0.420567252
[111]   0.112479330  -0.249831924  -8.550796046  -3.097363410  -4.029848055
[116]   1.222742419 -12.391245990  -4.448975351  -7.991908479  -3.137404059
[121]   5.273144040  -2.787735714  -4.374998736  -0.956371997  -6.666504925
[126]  -3.686506291  -8.065660990  -2.646318617   3.993320585  -6.827222717
[131]   1.661738145   9.724893300   2.431334526   4.392091551  -1.718006171
[136]  -5.146751437   4.332315454   5.684877836   0.503336896   0.359933390
[141]  -8.866389577  -0.475804014   0.220770483  -0.440183356  -4.548850602
[146]  -0.871808663  -0.925629268   2.106940383   4.515200278  -5.139564796
[151]  -4.087731061  -2.970674609  -7.731845195  -2.356441770 -10.693524485
[156]  -1.294281856  -6.999112686   3.007826455   0.198314989  -5.129254019
[161]  -1.073248977  -8.642882768  -1.295355602 -10.561506792  -2.976380846
[166]  -0.491553397  -4.818072105   4.882141871   0.580746623  -3.665063328
[171]   0.734601575   1.581488384  -1.660619869   2.902118748   3.439133346
[176]  -2.301320618  -7.604744216  -5.582537935   2.804042840  -0.191201299
[181]   1.595458525  -0.752710451   3.887764022  -5.001119943  -2.927549528
[186]  -1.564184003  -2.558046047   2.972283676  -6.519802454  -0.176836010
[191]   2.427488076   1.749032430  -4.860963592  -5.586113950 -10.451774044
[196]  -3.802976135  -3.752721635  -0.042636221  -8.556242767  -4.967999070
[201]  -2.639954959  -0.964525504  -0.906938169  -0.962763525  -0.255815836
[206] -12.095628900   8.414640904  -6.909305325   8.372040194   2.247696555
[211]   1.859199301  -5.966832825  -5.749458918  -4.292214504  11.681553260
[216]   1.853425200   1.041548827  -2.886714277  -0.257781542  -2.205721670
[221]  -4.501715932  -0.627910829  -7.273171509  -3.237638513  -0.078960830
[226]   3.644240063   1.009379362   7.699163619  -2.502056368  -4.219268656
[231]  -0.695878331   3.759497580   3.256396557   0.074037275  -1.766333759
[236]  -1.223483754   7.589799811  -1.301460196   0.607870846  -3.235564155
[241]  -0.284855813  -3.099090750   0.594136105  -0.513495834   0.991971338
[246]   2.319154359  -0.565007769   0.162593872  -5.529721920  -9.078465542
[251]  -1.823293999  -5.901134696  -1.751130487   0.527788823   3.050854250
[256]   3.282458600   0.640060334  -3.101083111  -2.214666919  -1.637682257
[261]   2.978448436 -11.725673170  -3.101259655   0.713390308  -4.887105590
[266]   0.583213838   4.524375994   0.873810753  -4.052256271  -4.897953357
[271]  -1.113383516  -8.863392352   0.351331950  -4.598381738   1.121311848
[276] -11.886822040  -3.919019597  -2.397866414   0.201275948  -7.937555068
[281]   0.173539980  -1.076365731  -2.292450094   2.264912799  -6.684784470
[286]  -0.980877502  -6.278888259  -3.312827397  -6.325033478   6.100704130
[291]   2.182965683   1.189477739  -0.637008309   2.340000229   2.607943398
[296]  -5.729776906  -0.879799731  -7.316271831   5.823797583   5.542616296
[301]  -2.768356553  -2.649476676  -5.447415993   6.304278393   3.086279897
[306]  -2.995853872   9.551482480   3.342309702  -0.179252169  -1.022199250
[311]  -0.220369456   3.577799942  -3.959278774  -3.907498454  -0.611402244
[316]  -2.288827183   2.788144408  -5.005747329   1.955089726   0.431933215
[321]   3.746211331  -3.893791250   0.945065692  -2.090372906  -0.451494388
[326]  -8.153270644   0.910464401   4.701148480  -7.495441014   1.451315442
[331]   5.054344820  -2.301082342 -15.125808810   0.600115691 -15.457201580
[336]   4.189001697  10.411504160 -10.741078015  -9.033645437  -4.083064113
[341]   3.632680510   1.180441382 -20.317224060  13.554935630   0.753334117
[346]  -6.143655248  -7.606571354  -7.873940749 -19.096120550  -7.553098356
[351] -20.838987630  -6.613221572  18.767161260   4.539571391 -18.737275920
[356]   4.112775749  -2.170409363  14.463948470  -4.104504085 -10.306840473
[361]  -2.143217009  -6.156728450  -5.144767241  15.249518530  -1.420879069
[366]   8.561730297  -0.033489071   4.538032148   5.959315205 -13.082265630
[371] -11.027444330   1.338430654  -3.161762843  -1.277727690 -13.642002550
[376]  10.178464110 -10.623626657  -6.570543494  -2.299357600 -13.889915290
[381] -16.832476550   6.479555319   8.995240341   1.868494632   8.339104123
[386]   1.234894013   6.254333611 -18.904909290   0.605067053   2.881734698
[391]  -5.591986798   5.657079290   4.745106770  -3.040226820  -3.024511127
> y
  [1] -0.87764007 -0.06809445 -1.05577559  0.46898584  0.05512316 -0.05500350
  [7]  0.06845895 -0.68385818 -0.23946106 -3.20217258 -1.13154127 -1.53222477
 [13] -2.74132167 -0.79527372 -1.14786528  0.39602577 -0.83765452 -0.98433415
 [19] -0.78232702 -1.91748643 -1.90348308 -0.62942056 -2.52818602  0.42544298
 [25] -0.17622365  0.16416148 -0.45167703 -1.14519757 -0.85598328 -1.00872941
 [31] -1.04448882  1.26508514 -3.30024615 -1.80297460  0.90508129 -0.85872455
 [37] -1.27455732 -2.08939027 -1.10605667 -0.84616034  0.37858155 -0.01592816
 [43] -2.09384068 -3.33585529 -0.98037933 -1.77323164 -0.46873025 -4.13046046
 [49] -2.06383274  0.86441098 -2.76541668 -1.68007795 -1.46523690  1.08719974
 [55] -4.08370281 -1.86587413 -0.14772589 -3.17088619 -1.42542584 -7.88580356
 [61] -0.20271225  1.74374543 -2.35125329  1.72377525 -1.26575202 -0.37140415
 [67]  0.68536603 -4.51241307 -0.78612832  2.18828647 -0.72849582 -1.39848061
 [73] -1.96828612 -1.81234282  0.71481733 -3.91037900 -1.86381055 -1.21115349
 [79] -2.47174178  0.32151756 -0.73679270 -4.58610801  2.52463839  1.07387000
 [85] -2.34971449 -0.35243381  0.61037341 -1.20513122  2.11797602  0.98381151
 [91] -1.57476469  1.00556884  0.26101964 -1.02493963 -1.23754984 -0.78823027
 [97] -1.06829790 -0.97907631 -1.04929278 -1.04674144 -1.19910602 -2.86797016
[103] -2.91072142  0.57233691 -0.72103646 -4.00232492 -1.42929601 -1.36025595
[109] -2.54444216  1.07426734  1.26828347 -0.52915688 -0.38797936 -0.91114098
[115] -1.74115423 -2.70243845 -1.70112063 -0.15121445 -4.11855381 -1.34079136
[121] -3.08445016 -3.65713858  1.48396921  0.09218400 -0.78508512 -3.25255630
[127] -0.91807622 -2.09001694 -0.90824925 -1.30297061  2.26672142 -0.72781850
[133] -2.50928240  2.11801025 -0.29066387 -0.20207044 -0.97501299 -1.51002268
[139]  0.67203945  0.17811794 -1.19506059  1.00388869 -2.99146271 -4.78099395
[145] -3.94306251 -3.75502897 -2.54787007 -2.46406303 -1.35553287  1.48419280
[151] -0.87158539 -1.64555265 -0.50671519  1.15522733 -0.15717636 -4.60926633
[157] -4.02895622 -0.74687934 -0.53006372 -3.41470896 -1.33205648 -0.97831548
[163] -1.72347720 -5.49250337  0.73609178 -0.43131218 -3.86646043 -8.45754195
[169] -1.11316055  1.05020599  4.68888692 -3.78987076  0.85301834 -0.41252172
[175]  0.42574093 -0.75451334  1.21544981 -0.69377923 -5.48678617 -2.24522543
[181] -3.08122813 -1.10278237 -1.23122885 -2.15524550  2.83946994 -0.24385874
[187] -1.33451919  0.50193851 -4.50325168  1.54582284 -1.24988272  0.82689729
[193]  0.18328816  1.17845389 -0.01711778 -0.80703617 -5.74827049 -2.54627811
[199] -1.95734414  1.77184166 -0.01136237 -0.95386936 -0.94108824 -2.61305327
[205] -3.82796295 -1.40964671 -4.47210022 -3.67352482  2.73960334 -0.05942475
[211]  1.71523815  0.59058494 -2.90119691  1.16824162 -4.29125852  1.43198933
[217]  0.37962409  0.66095791 -0.19662372 -0.36464912 -2.93508835 -2.36411746
[223] -2.28807664  1.76303056 -2.85094802 -1.42602623  0.41655753  0.05451804
[229] -0.89926402  2.01821026 -1.58295686 -1.46512178 -2.27844967  2.85216892
[235]  0.51612783 -0.32098581 -2.18770338  0.02540373 -0.07886571 -0.52672044
[241]  0.21877305 -2.96771227 -1.28428561 -1.73933562 -0.82270290 -0.38226166
[247]  0.96370488  0.77079590 -0.13704533 -0.26336792 -2.57670801 -1.75722662
[253] -0.54047368 -3.74054467 -0.35712640 -2.94239007 -0.03045306  1.91626100
[259]  1.80488663 -2.17726798  0.44203142 -2.00827971  0.68504873 -4.57512205
[265] -4.36169991 -0.45541545 -4.81296826 -1.25547838  1.36107515 -0.76860147
[271] -0.03841298 -3.76640618 -2.88933069 -2.72286329 -1.49231185 -1.37829602
[277] -1.66114833 -1.39116306 -1.14732881 -1.15517833 -2.41034617 -2.65675278
[283] -1.49831634 -0.36405988 -3.53305208 -0.93331108 -0.98966754 -0.89967460
[289] -1.15921210 -2.11876830 -1.36050651 -1.79467134 -2.82637031 -0.97971559
[295]  1.05969235  0.01468765  2.21968987 -3.43358833 -3.37230680 -1.37056341
[301]  0.26605044 -0.17540785 -2.85299929 -4.16164202 -0.55707279 -1.42894211
[307] -2.31096103  0.01482008 -1.30511150 -0.98194985 -3.69650644 -2.10764417
[313]  0.14146333 -0.84067692 -3.05527708 -0.79727401 -1.36717140 -1.05614556
[319] -1.89702227 -1.26108378 -1.65184745 -1.33931734  2.95488561 -3.97265791
[325] -0.70842449 -0.61210306 -0.93807934 -5.01927071  1.79993698 -1.96185257
[331] -1.68942089 -1.52808586 -0.91117868 -4.59617736 -2.46479019 -0.24091455
[337] -4.39206369  1.38375556  2.77319716 -0.82728584 -2.37366448 -1.55451563
[343] -1.61670816 -0.66175676 -5.96950126 -2.45922607 -4.45839341 -1.70857191
[349] -1.96710065 -3.76488373 -7.35839935 -2.21680300 -8.37860427  5.32625305
[355]  1.24455347  0.06493777 -6.86503723 -3.54831640  0.93610007 -1.67805269
[361] -1.19781471 -3.76346016 -1.42695494 -7.33345672  1.59846092 -0.31208871
[367]  4.04709868 -2.22107078 -2.43961403  7.78759082 -3.38672446 -0.46022573
[373] -0.63052597 -3.14916787 -0.98066591  0.01687041 -6.48595181 -0.49377610
[379] -2.93461476 -1.52111054 -0.94428372 -4.49465034 -1.27582255  1.61069626
[385] -1.48615676 -1.24761174  0.07784155  0.09154009 -4.13311396 -1.45161228
[391] -0.18039490 -1.47651851 -1.34400055  1.17532512 -0.60942953
> postscript(file="/var/www/html/rcomp/tmp/1e1rn1261060699.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) 
> (r <- ccf(x,y,main='Cross Correlation Function',ylab='CCF',xlab='Lag (k)'))

Autocorrelations of series 'X', by lag

   -22    -21    -20    -19    -18    -17    -16    -15    -14    -13    -12 
 0.048 -0.104 -0.018  0.027 -0.004  0.050 -0.079  0.004  0.041 -0.002  0.104 
   -11    -10     -9     -8     -7     -6     -5     -4     -3     -2     -1 
-0.013 -0.026  0.011  0.017 -0.001 -0.027  0.004  0.025  0.077  0.460  0.100 
     0      1      2      3      4      5      6      7      8      9     10 
-0.080 -0.019  0.017 -0.025  0.016 -0.031  0.087 -0.043 -0.010  0.084 -0.009 
    11     12     13     14     15     16     17     18     19     20     21 
-0.061 -0.074 -0.065  0.032  0.065 -0.059  0.094 -0.029 -0.030  0.056 -0.052 
    22 
 0.018 
> dev.off()
null device 
          1 
> 
> #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,'Cross Correlation Function',2,TRUE)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Parameter',header=TRUE)
> a<-table.element(a,'Value',header=TRUE)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Box-Cox transformation parameter (lambda) of X series',header=TRUE)
> a<-table.element(a,par1)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Degree of non-seasonal differencing (d) of X series',header=TRUE)
> a<-table.element(a,par2)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Degree of seasonal differencing (D) of X series',header=TRUE)
> a<-table.element(a,par3)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Seasonal Period (s)',header=TRUE)
> a<-table.element(a,par4)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Box-Cox transformation parameter (lambda) of Y series',header=TRUE)
> a<-table.element(a,par5)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Degree of non-seasonal differencing (d) of Y series',header=TRUE)
> a<-table.element(a,par6)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Degree of seasonal differencing (D) of Y series',header=TRUE)
> a<-table.element(a,par7)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'k',header=TRUE)
> a<-table.element(a,'rho(Y[t],X[t+k])',header=TRUE)
> a<-table.row.end(a)
> mylength <- length(r$acf)
> myhalf <- floor((mylength-1)/2)
> for (i in 1:mylength) {
+ a<-table.row.start(a)
+ a<-table.element(a,i-myhalf-1,header=TRUE)
+ a<-table.element(a,r$acf[i])
+ a<-table.row.end(a)
+ }
> a<-table.end(a)
> table.save(a,file="/var/www/html/rcomp/tmp/2j7ni1261060699.tab") 
> 
> try(system("convert tmp/1e1rn1261060699.ps tmp/1e1rn1261060699.png",intern=TRUE))
character(0)
> 
> 
> proc.time()
   user  system elapsed 
  0.495   0.172   0.591