Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
15391 13704 15409 15098 15254 15522 16669 16238 16246 15424 14952 15008 14929 13905 14994 14753 15031 15386 16160 16116 16219 16064 15436 15404 15112 14119 14775 14289 15121 15371 15782 16104 15674 15105 14223 14385 14558 13804 14672 14244 15089 14580 15218 15696 15129 15110 14204 13655 14534 12746 14074 13699 14184 14110 15820 15362 14993 14437 13694 13688 14366 13267 14409 14031 14584 14626 15669 15460 15552 15220 13907 14090 14176 12523 13597 13241 14345 14273 15308 15353 15330 14610 13852 13902
Name of dataseries
Source
Description
Season
12
12
6
4
No season
Chart options
Title:
Label y-axis:
Label x-axis:
Y-axis minimum
Y-axis maximum
R Code
par4 <- '12' par3 <- 'Aantal levendgeborenen in 2009 tot 2015 ' par2 <- 'cbs.nl' par1 <- 'Aantal levendgeborenen' if (par4 != 'No season') { par4 <- as.numeric(par4) if (par4 < 4) par4 <- 12 } summary(x) n <- length(x) bitmap(file='test1.png') 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() load(file='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='mytable.tab')
Compute
Summary of computational transaction
Raw Input
view raw input (R code)
Raw Output
view raw output of R engine
Computing time
0 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation