Wessa.net

Send output to:


Data:
100.32 100.41 100.32 100.37 100.32 100.26 100.27 100.34 100.32 100.33 100.38 100.35 100.44 100.47 100.49 100.52 100.47 100.48 100.48 100.53 100.62 100.89 100.97 101.01 101.02 100.92 100.93 100.98 101.07 101.10 101.11 101.19 101.31 101.52 101.61 101.65 101.66 101.56 101.75 101.83 101.98 102.06 102.07 102.10 102.42 102.91 103.14 103.23 103.23 102.91 103.11 103.14 103.26 103.30 103.32 103.44 103.54

Name of dataseries


Source


Description


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')

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