Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
175.0 154.0 146.3 169.1 180.4 155.6 147.1 166.0 169.9 155.8 143.1 188.9 177.8 154.3 143.5 166.3 179.5 155.8 143.6 167.3 176.8 149.7 142.8 161.9 172.4 154.9 146.3 184.9 170.2 151.1 144.5 161.8 174.7 153.7 143.2 170.1 181.0 149.7 144.1 164.1 180.8 151.3 141.5 158.9 166.7 152.3 143.1 165.4 184.0 143.5 139.2 162.7 183.2 142.8 134.7 149.9 167.6 146.3 137.6 152.8 164.1 146.3 141.1 156.5 162.6 146.7 141.0 161.7 161.1 139.7 135.5 148.3 164.7 143.3 131.6 143.3 159.9 141.4 130.7 140.2 159.3 138.0 129.9 147.5 155.6 140.2 130.3 153.5
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
1 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation