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.

> x <- c(-0.240600301914558
+ ,-0.606751279496197
+ ,0.841700576474228
+ ,-0.464422369031323
+ ,-0.80419206798613
+ ,0.47553654317871
+ ,0.955136034326894
+ ,0.180767515894165
+ ,0.0794724479792024
+ ,0.686376799231348
+ ,-0.392661912197106
+ ,-0.199976041340012
+ ,0.514326382833567
+ ,-0.43055735960059
+ ,1.12038143753462
+ ,-1.34678178511079
+ ,0.0755020123892985
+ ,-0.316672037874627
+ ,0.0107770608690369
+ ,-0.773737270856957
+ ,0.55769942667155
+ ,0.0383033086452593
+ ,0.461795224657105
+ ,-0.0795434249694821
+ ,0.210956709077705
+ ,-0.401004555689343
+ ,0.662335949795043
+ ,-0.564527862656545
+ ,-0.831970414021715
+ ,-0.605113565330531
+ ,-0.509118613961381
+ ,-0.41147835179962
+ ,0.379329467979692
+ ,0.664071735156227
+ ,0.48872132469005
+ ,0.28267494286893
+ ,-0.562805192757295
+ ,0.601762554361001
+ ,0.862009862199473
+ ,-1.22943388808814
+ ,-0.101977908084105
+ ,0.120165057844868
+ ,-1.08613504084789
+ ,-0.274785284005727
+ ,0.507722006876642
+ ,0.717080121054148
+ ,1.07117072515519
+ ,0.243523181044933
+ ,-0.91017042147769
+ ,0.757642878131445
+ ,1.00424813567803
+ ,-0.179111032399090
+ ,0.0501606235499721
+ ,-0.178450756851609
+ ,0.0633933124580967
+ ,-0.179750288125893
+ ,-0.492306836638491
+ ,0.842599863313391
+ ,1.02574569539223
+ ,-0.497178972087455
+ ,-0.451334673226046
+ ,0.80837108761284
+ ,-0.156403247059013
+ ,-0.680774182600329
+ ,-0.219340369031010
+ ,-0.459630232337713
+ ,-0.165280581236573
+ ,0.465930832668064
+ ,-0.857493863819025
+ ,0.337723911549614
+ ,0.289687860948626
+ ,-0.42845454102129
+ ,-0.341201793473713
+ ,0.461116595414386
+ ,0.00131853805712300
+ ,-0.438584529809083
+ ,0.0604162388064315
+ ,-0.407676575895982
+ ,-0.230461098835618
+ ,0.0982577617670412
+ ,0.111703554704248
+ ,0.708022926727143
+ ,0.339749151643357
+ ,-2.18627092582953
+ ,-0.378089451039362
+ ,1.37406005058272
+ ,0.309320136047612
+ ,0.494093183589736
+ ,-0.144444327543072
+ ,-0.480164600279602
+ ,0.142892284397971
+ ,-0.692635320075078
+ ,0.042990536925702
+ ,0.0956616264499409
+ ,-0.4991236385213
+ ,-0.429548179675468
+ ,-0.144725958519894
+ ,-0.765958155312141
+ ,-0.0274559067042687
+ ,0.467898530618721
+ ,-0.578576956141817
+ ,0.430168535440606
+ ,-0.0119632395755117
+ ,-0.636342611607562
+ ,-2.27528056323212
+ ,-3.06193295003795
+ ,-0.74802847451331
+ ,0.797609219408812
+ ,0.236855826006412
+ ,0.930431668025304
+ ,0.599532813073625
+ ,0.167953987300712
+ ,0.594140139708448
+ ,-0.0353459311323537
+ ,0.201966272884280
+ ,-0.0945952649513605
+ ,0.455380633096922
+ ,0.328718884914367
+ ,-1.14915917946481
+ ,0.40333519566637
+ ,-0.543764749768531
+ ,-0.645631546357695
+ ,-2.11505356579880
+ ,-2.21260518992258
+ ,-0.55451014045564
+ ,0.958643737026575
+ ,1.15683077232600
+ ,0.0777957205551091
+ ,0.113651238226703
+ ,1.40538971716113
+ ,0.113661628230676
+ ,0.0416464630188448
+ ,-0.582086886617459
+ ,1.02191054429325
+ ,-0.29444144569483
+ ,0.829267764066529
+ ,0.26222034366592
+ ,-0.574793946859501
+ ,0.138698917551611
+ ,-0.584067411244797
+ ,-0.258151783727533
+ ,0.543379137513926
+ ,-0.232245241831294
+ ,-0.0928266449687114
+ ,0.446337818879937
+ ,-0.857584051589188
+ ,-0.710048574509983
+ ,0.692719504379485
+ ,1.26606124892259
+ ,-0.422883318575315
+ ,0.302453627669753
+ ,-0.305562989762834
+ ,0.139012162616753
+ ,0.127035779245997
+ ,-0.493737617832826
+ ,-0.154359504448045
+ ,-0.0944648147492858
+ ,-1.15677238906798
+ ,-0.049504164298154
+ ,1.71105154071859
+ ,0.268158385639669
+ ,0.634844714100691
+ ,0.00147812287852109
+ ,-0.553841384687648
+ ,-0.175205222950920
+ ,-0.196424568213511
+ ,-0.0648964735720947
+ ,0.493810035232787
+ ,-0.333706235556439
+ ,-0.431791182384206
+ ,0.736158384191749
+ ,-0.0610650757936122
+ ,-0.257020593908912
+ ,-0.456956081031517
+ ,0.581753313204589
+ ,0.124278884147837
+ ,-0.379708463372791
+ ,0.0847795490217852
+ ,-0.202422256527295
+ ,-0.0934603283996963
+ ,-0.759349517087439
+ ,0.070320181856861
+ ,0.159998033436698
+ ,-0.453243592519746
+ ,0.263556725170666
+ ,0.202905501718548
+ ,-0.870094132128707
+ ,-0.68982848988833
+ ,-0.807587134931657
+ ,-0.0477322490395547
+ ,-1.08936895582894
+ ,-0.443057513496427
+ ,-1.62760861320762
+ ,-1.78954722751584
+ ,-1.15620211495405
+ ,1.57839652572450
+ ,-0.713266361566192
+ ,-0.542401956284505
+ ,0.923910989451428
+ ,0.721513311617556
+ ,-0.492444513098854
+ ,-0.0527593054220604
+ ,0.306748883570196
+ ,0.540021258560118
+ ,0.0315495988912361
+ ,0.306203067837418
+ ,0.812113654667114
+ ,-5.76350137876644
+ ,3.30770206339885
+ ,1.69835499176176
+ ,1.03261637517556
+ ,0.427343322851021
+ ,0.21464944790989
+ ,0.856529215092358)
> par4 = '12'
> par3 = ''
> par2 = ''
> par1 = ''
> ylimmax = ''
> ylimmin = ''
> ylab = 'value'
> xlab = 'index or time'
> main = ''
> #'GNU S' R Code compiled by R2WASP v. 1.0.44 ()
> #Author: Dr. Ian E. Holliday
> #To cite this work: Ian E. Holliday, 2009, 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: 
> #Technical description: 
> if (par4 != 'No season') {
+ par4 <- as.numeric(par4)
+ if (par4 < 4) par4 <- 12
+ }
> summary(x)
    Min.  1st Qu.   Median     Mean  3rd Qu.     Max. 
-5.76400 -0.45900 -0.01971 -0.05258  0.45310  3.30800 
> n <- length(x)
> postscript(file="/var/www/html/rcomp/tmp/1j4zc1292102613.ps",horizontal=F,onefile=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) 
> if (par4=='No season') {
+ plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n')
+ axis(1,at=seq(1,n,10))
+ }
> if (par4!='No season') {
+ plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n')
+ axis(1,at=seq(1,n,par4))
+ grid(nx=0,ny=NULL,col='black')
+ abline(v=seq(1,n,par4),col='black',lty='dotted')
+ }
> 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,'Univariate Dataseries',2,TRUE)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Name of dataseries',header=TRUE)
> a<-table.element(a,par1)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Source',header=TRUE)
> a<-table.element(a,par2)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Description',header=TRUE)
> a<-table.element(a,par3)
> a<-table.row.end(a)
> a<-table.row.start(a)
> a<-table.element(a,'Number of observations',header=TRUE)
> a<-table.element(a,length(x))
> a<-table.row.end(a)
> a<-table.end(a)
> table.save(a,file="/var/www/html/rcomp/tmp/2xvfl1292102613.tab") 
> 
> try(system("convert tmp/1j4zc1292102613.ps tmp/1j4zc1292102613.png",intern=TRUE))
character(0)
> 
> 
> proc.time()
   user  system elapsed 
  0.453   0.219   0.938