Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
149.77 149.68 149.59 147.61 145.53 144.8 144.63 144.28 144.02 143.96 143.82 143.46 143.26 142.99 142.65 142.56 142.54 142.45 142.44 142.41 142.38 142.11 140.58 136.52 135.73 135.71 135.68 135.63 135.56 135.29 134.44 131.6 130.03 129.74 128.25 123.96 123.72 123.7 123.7 123.7 123.58 123.58 123.09 120.59 120.26 120.26 120.25 120.24 120.22 120.1 120.03 119.73 118.5 118.02 117.96 117.95 117.71 116.72 115.16 114.92 114.86
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
bitmap(file='test1.png') plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab) 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