Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
31.045 31.165 31.160 31.120 31.290 31.420 31.360 31.255 31.495 31.380 31.200 31.545 31.665 31.920 31.445 31.170 31.355 31.265 31.480 31.305 31.250 30.500 31.405 31.355 31.200 31.090 31.005 30.790 30.515 30.590 30.675 30.450 30.050 29.480 29.235 29.200 29.135 29.150 29.115 28.695 29.010 28.840 28.890 28.665 29.335 29.670 29.800 29.770 30.500 29.320 29.555 29.865 30.520 30.669 30.850 30.850 30.330 30.535 30.350 30.945 31.030 31.125 32.445 32.550 32.585 32.640 32.550 32.260 32.520 32.350 32.630 32.270 32.015 32.335 32.180 32.360 32.390 32.520 33.185 33.740 32.580 31.720 31.975 32.080 32.155 31.740 31.435 31.755 31.635 31.365 30.320 30.810 31.960 31.535 32.120 31.380 30.610 29.355 30.210 29.645 29.050 28.960 28.630
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