Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
€38327240.00 €38147255.00 €37964735.00 €37587020.00 €41323610.00 €41125880.00 €38327240.00 €36466550.00 €36646535.00 €36646535.00 €36846800.00 €37206770.00 €37767005.00 €37767005.00 €37407035.00 €36466550.00 €41323610.00 €42063830.00 €40945895.00 €38327240.00 €39447710.00 €37767005.00 €38524970.00 €38887475.00 €39265190.00 €38327240.00 €38524970.00 €37206770.00 €41323610.00 €42624065.00 €41506130.00 €39447710.00 €41686115.00 €39265190.00 €41506130.00 €41323610.00 €41883845.00 €39825425.00 €42063830.00 €41883845.00 €45242720.00 €44484755.00 €41506130.00 €40005410.00 €42063830.00 €39265190.00 €41323610.00 €41686115.00 €42444080.00 €40765910.00 €41686115.00 €42246350.00 €44304770.00 €42624065.00 €40385660.00 €37964735.00 €40205675.00 €34045625.00 €37026785.00 €38704955.00 €40385660.00 €37964735.00 €37964735.00 €37964735.00 €39265190.00 €37407035.00 €34968365.00 €32927690.00 €34408130.00 €28628330.00 €32169725.00 €34228145.00 €34605860.00 €32547440.00 €32727425.00 €32169725.00 €34045625.00 €32727425.00 €30129050.00 €28250615.00 €31426970.00 €24529235.00 €29008580.00 €31049255.00 €31049255.00 €28628330.00 €26389925.00 €26209940.00 €28250615.00 €26389925.00 €22851065.00 €20412395.00 €23031050.00 €16873535.00 €22470815.00 €25449440.00 €26389925.00 €24331505.00 €21730595.00 €23591285.00 €24331505.00 €23771270.00 €18171455.00 €15573080.00 €17431235.00 €11833955.00 €17613755.00 €19672175.00 €21350345.00 €18551705.00 €15933050.00 €17431235.00 €18171455.00 €16691015.00 €11093735.00 €8655065.00 €10893470.00 €4735955.00 €11453705.00 €15573080.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
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