Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
1844 1790 1707 1617 1530 1453 1386 1329 1255 1201 1179 1167 1160 1161 1203 1290 1404 1550 1670 1746 1817 1836 1872 1956 2010 1933 1917 1900 1829 1805 1730 1650 1618 1582 1576 1512 1540 1519 1473 1402 1299 1267 1200 1145 1103 1076 1095 1080 1082 1060 1027 1003 987 959 913 912 889 882 901 913 921 914 950 894 930 890 898 880 840 845 819 838 833 837 850 927 932 978 978 974 977 950 935 913 942 990 1075 1181 1336 1492
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