Wessa.net

Send output to:


Data:
31.481 29.896 33.842 39.120 33.702 25.094 51.442 45.594 52.518 48.564 41.745 49.585 32.747 33.379 35.645 37.034 35.681 20.972 58.552 54.955 65.540 51.570 51.145 46.641 35.704 33.253 35.193 41.668 34.865 21.210 56.126 49.231 59.723 48.103 47.472 50.497 40.059 34.149 36.860 46.356 36.577 23.872 57.276 56.389 57.657 62.300 48.929 51.168 39.636 33.213 38.127 43.291 30.600 21.956 48.033 46.148 50.736 48.114 38.390 44.112

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	1 seconds
R Server	Big Analytics Cloud Computing Center