Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
820 829 677 720 846 842 1137 961 1008 872 1094 905 622 1068 760 809 838 1008 838 1057 904 803 810 992 667 803 611 712 785 599 1008 1136 931 1051 956 1006 1077 772 679 787 1011 701 1269 1007 1013 1209 1036 1084 926 1083 912 910 886 948 1134 1226 1515 1491 1086 1274 1164 1205 966 1462 1134 1141 1676 1166 1492 1413 1287 1206 1054 1236 1069 1264 1318 1093 1495 1121 1342 1335 1261 1317 867 1428 1199 961 1195 1225 1282 1629 1187
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