R version 2.7.0 (2008-04-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.

> x <- c(114391
+ ,111051
+ ,106647
+ ,103162
+ ,99608
+ ,98997
+ ,126460
+ ,136262
+ ,135822
+ ,132354
+ ,129979
+ ,128500
+ ,124920
+ ,120605
+ ,114690
+ ,110779
+ ,106162
+ ,106118
+ ,132883
+ ,143924
+ ,143425
+ ,139205
+ ,131789
+ ,127654
+ ,123298
+ ,116885
+ ,110418
+ ,104208
+ ,100795
+ ,99882
+ ,127799
+ ,140986
+ ,138715
+ ,133424
+ ,129735
+ ,124043
+ ,123551
+ ,113847
+ ,107984
+ ,103936
+ ,99498
+ ,96269
+ ,120018
+ ,127608
+ ,126444
+ ,121877
+ ,116777
+ ,115133
+ ,111257
+ ,103592
+ ,97497
+ ,92297
+ ,88750
+ ,88628
+ ,109561
+ ,114150
+ ,114732
+ ,115268
+ ,108691
+ ,108259
+ ,104909
+ ,97185
+ ,91517
+ ,86648
+ ,82376
+ ,82067
+ ,103051
+ ,105831
+ ,105303
+ ,101431
+ ,96328
+ ,93688
+ ,90171
+ ,83656
+ ,77251
+ ,72505
+ ,68115
+ ,68799
+ ,91063
+ ,94698
+ ,92291
+ ,88259
+ ,83263
+ ,80962
+ ,77956
+ ,71438
+ ,67815
+ ,61327
+ ,57311
+ ,57810
+ ,78034
+ ,83724
+ ,80213
+ ,76076
+ ,71569
+ ,69609
+ ,67110
+ ,61849
+ ,56898
+ ,53113
+ ,50008
+ ,51266
+ ,73229
+ ,77456
+ ,76805
+ ,73811
+ ,70213
+ ,69124
+ ,67040
+ ,63741
+ ,59141
+ ,55984
+ ,52667
+ ,53688
+ ,74537
+ ,80176
+ ,78917
+ ,76515
+ ,72646
+ ,71987
+ ,70105
+ ,65659
+ ,61769
+ ,59068
+ ,56235
+ ,57678
+ ,77644
+ ,82888
+ ,81252
+ ,78309
+ ,75464
+ ,76134
+ ,74684
+ ,71998
+ ,67715
+ ,64980
+ ,62674
+ ,63976
+ ,84598
+ ,90514
+ ,90592
+ ,86673
+ ,83838
+ ,82777
+ ,81241
+ ,77178
+ ,72317
+ ,68340
+ ,64776
+ ,65143
+ ,83222
+ ,90605
+ ,89743
+ ,85105
+ ,80429
+ ,78637
+ ,76418
+ ,73400
+ ,69202
+ ,66098
+ ,62196
+ ,62434
+ ,82276
+ ,89371
+ ,88826
+ ,85778
+ ,81093
+ ,80104
+ ,79154
+ ,75648
+ ,70856
+ ,68143
+ ,64227
+ ,64240
+ ,84343
+ ,91703
+ ,90377
+ ,84804
+ ,79915
+ ,77988
+ ,74901
+ ,72260
+ ,68754
+ ,65727
+ ,61634
+ ,62455
+ ,80019
+ ,86636
+ ,87506
+ ,81255
+ ,75847
+ ,74388
+ ,71477
+ ,69324
+ ,65319
+ ,61864
+ ,58345
+ ,56921
+ ,74184
+ ,86153
+ ,82793
+ ,74900
+ ,69581
+ ,68859
+ ,67164
+ ,64119
+ ,61087
+ ,58102
+ ,55091
+ ,54312
+ ,70360
+ ,79808
+ ,76783
+ ,69749
+ ,64084
+ ,62253
+ ,60804
+ ,57907
+ ,54355
+ ,52536
+ ,49081
+ ,48877
+ ,64599
+ ,75314
+ ,71209
+ ,65210
+ ,59829
+ ,57656
+ ,57428
+ ,55315
+ ,52790
+ ,51050
+ ,48519
+ ,48354
+ ,65333
+ ,73990
+ ,72755
+ ,67424
+ ,59214
+ ,57427
+ ,56681
+ ,55437
+ ,53600
+ ,51641
+ ,49478
+ ,50124
+ ,71313
+ ,76208
+ ,74387
+ ,69520
+ ,64735
+ ,63413
+ ,62553
+ ,60109
+ ,57764
+ ,55667
+ ,53103
+ ,55301
+ ,76795
+ ,80928
+ ,79213
+ ,72759
+ ,67802
+ ,66940
+ ,66396
+ ,64846
+ ,61343
+ ,58537
+ ,55785
+ ,57905
+ ,77981
+ ,82155
+ ,80710
+ ,73839
+ ,68212
+ ,65444
+ ,63181
+ ,61198
+ ,59010
+ ,56388
+ ,53723
+ ,55340
+ ,75352
+ ,79817
+ ,78289
+ ,71892
+ ,66448
+ ,64167
+ ,61250
+ ,59580
+ ,56417
+ ,54662
+ ,53349
+ ,55385
+ ,73546
+ ,77683
+ ,74995
+ ,67282
+ ,60742
+ ,57283
+ ,57314
+ ,54704
+ ,51578
+ ,49962
+ ,46252
+ ,47234
+ ,64708
+ ,68753
+ ,62970
+ ,57474
+ ,52494
+ ,51831
+ ,51663
+ ,49637
+ ,46679
+ ,45557
+ ,41630
+ ,44417
+ ,60070
+ ,63157
+ ,58673)
> par3 = 'Totale niet-werkende werkzoekenden vrouwen -25 jaar'
> par2 = 'belgostat'
> par1 = 'Niet-werkende werkzoekende vrouwen -25 jaar'
> ylab = 'value'
> xlab = 'index'
> main = 'Niet-werkende werkzoekende vrouwen -25ja'
> #'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: Write here your technical program description (don't use hard returns!)
> postscript(file="/var/www/html/rcomp/tmp/1dru01223919924.ps",horizontal=F,pagecentre=F,paper="special",width=8.3333333333333,height=5.5555555555556) 
> plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab)
> 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/2vyoi1223919924.tab") 
> 
> system("convert tmp/1dru01223919924.ps tmp/1dru01223919924.png")
> 
> 
> proc.time()
   user  system elapsed 
  1.246   0.357   1.306