Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
2.457.13 2.378.17 2.385.96 2.422.40 2.345.39 2.236.94 2.114.00 2.134.43 2.247.30 2.313.55 2.267.79 2.159.56 2.048.32 2.036.71 2.149.10 2.123.99 2.204.91 2.488.92 2.572.98 2.701.54 2.717.79 2.646.43 2.711.94 2.634.01 2.613.94 2.636.87 2.649.24 2.579.39 2.504.58 2.462.32 2.467.38 2.446.66 2.656.32 2.626.15 2.482.60 2.539.91 2.502.66 2.466.92 2.513.17 2.443.27 2.293.41 2.070.83 2.029.60 2.052.02 1.864.44 1.670.07 1.810.99 1.905.41 1.862.83 2.014.45 2.197.82 2.962.34 3.047.03 3.032.60 3.504.37 3.801.06 3.857.62 3.674.40 3.720.98 3.844.49 4.116.68 4.105.18 4.435.23 4.296.49 4.202.52 4.562.84 4.621.40 4.696.96 4.591.27 4.356.98 4.502.64 4.443.91
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 <- 'waarde van aandelenmarkt BEL 20' par2 <- '' par1 <- 'Aandelenwaarde BEL 20' 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
1 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation