Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
€3.469.648.00 €3.456.726.00 €3.443.622.00 €3.416.504.00 €3.684.772.00 €3.670.576.00 €3.469.648.00 €3.336.060.00 €3.348.982.00 €3.348.982.00 €3.363.360.00 €3.389.204.00 €3.429.426.00 €3.429.426.00 €3.403.582.00 €3.336.060.00 €3.684.772.00 €3.737.916.00 €3.657.654.00 €3.469.648.00 €3.550.092.00 €3.429.426.00 €3.483.844.00 €3.509.870.00 €3.536.988.00 €3.469.648.00 €3.483.844.00 €3.389.204.00 €3.684.772.00 €3.778.138.00 €3.697.876.00 €3.550.092.00 €3.710.798.00 €3.536.988.00 €3.697.876.00 €3.684.772.00 €3.724.994.00 €3.577.210.00 €3.737.916.00 €3.724.994.00 €3.966.144.00 €3.911.726.00 €3.697.876.00 €3.590.132.00 €3.737.916.00 €3.536.988.00 €3.684.772.00 €3.710.798.00 €3.765.216.00 €3.644.732.00 €3.710.798.00 €3.751.020.00 €3.898.804.00 €3.778.138.00 €3.617.432.00 €3.443.622.00 €3.604.510.00 €3.162.250.00 €3.376.282.00 €3.496.766.00 €3.617.432.00 €3.443.622.00 €3.443.622.00 €3.443.622.00 €3.536.988.00 €3.403.582.00 €3.228.498.00 €3.081.988.00 €3.188.276.00 €2.773.316.00 €3.027.570.00 €3.175.354.00 €3.202.472.00 €3.054.688.00 €3.067.610.00 €3.027.570.00 €3.162.250.00 €3.067.610.00 €2.881.060.00 €2.746.198.00 €2.974.244.00 €2.479.022.00 €2.800.616.00 €2.947.126.00 €2.947.126.00 €2.773.316.00 €2.612.610.00 €2.599.688.00 €2.746.198.00 €2.612.610.00 €2.358.538.00 €2.183.454.00 €2.371.460.00 €1.929.382.00 €2.331.238.00 €2.545.088.00 €2.612.610.00 €2.464.826.00 €2.278.094.00 €2.411.682.00 €2.464.826.00 €2.424.604.00 €2.022.566.00 €1.836.016.00 €1.969.422.00 €1.567.566.00 €1.982.526.00 €2.130.310.00 €2.250.794.00 €2.049.866.00 €1.861.860.00 €1.969.422.00 €2.022.566.00 €1.916.278.00 €1.514.422.00 €1.339.338.00 €1.500.044.00 €1.057.966.00 €1.540.266.00 €1.836.016.00
Name of dataseries
Source
Description
Season
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 <- 'Mijn cijferreeks gaat over de omzet van Evian op een jaarbasis.' par2 <- 'Niet gekend' par1 <- 'Omzet Evian op jaarbasis' 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') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Summary Statistics of dataseries x',1,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('summary(x)'),'</pre>',sep='')) a<-table.row.end(a) a<-table.end(a) table.save(a,file='mytable1.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