Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
89.29 89.37 89.53 89.6 89.75 89.94 90.06 90.14 90.39 90.36 90.44 90.57 90.85 90.96 91.19 91.27 91.42 91.53 91.69 91.77 91.85 92.05 92.04 92.1 92.34 92.67 92.88 93.07 93.15 93.24 93.35 93.58 93.61 93.75 93.94 93.98 94.42 94.52 94.77 94.97 95.04 95.32 95.47 95.36 95.54 95.57 95.52 95.56 95.83 95.87 96.06 96.06 96.15 96.26 96.28 96.36 96.38 96.43 96.47 96.55 96.71 96.87 96.99 97.1 97.26 97.31 97.33 97.33 97.45 97.61 97.59 97.6 97.96 98.36 98.36 98.51 98.77 98.78 98.89 98.86 99.04 99.09 99.1 99.12 99.37 99.46 99.6 99.88 99.88 100.01 100.02 100.19 100.2 100.35 100.47 100.58 101.4 101.67 101.82 101.85 101.98 102.06 102.16 102.2 102.35 102.47 102.55 102.62
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
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