Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
29 29 30 32 25 27 27 23 24 26 24 25 28 27 26 23 22 25 22 21 24 24 27 31 35 41 43 48 42 38 45 50 44 43 45 43 47 52 51 54 61 62 57 59 55 56 58 66 68 65 69 71 74 78 78 77 73 78 80 82 68 68 66 64 60 53 52 53 54 47 44 41 39 37 40 40 43 39 42 40 44 53 54 60 68 61 60 64 59 55 59 60 57 55 55 44 44 49 58 55 69 73 66 61 59 53 54 44 49 50 39 32 28 32 30 28 30 27 32 41 35 34 25 27 27 32 30 41 30 33 24 24 19 21 17 14 12 9 5 5 8 6 9 3 4 0 5 16 17 23 26 24 25 33 41 61 78 54 46 41 41 40 40 42 50 45 45 45 47 56 58 63 68 61 62 62 67 60 54 75 60 57 51 50 52 55 56 46 49 46 48 57 56 57 56 55 50 50 62 61 60 56 55 53 55 51 42 42 49 43 46 42 43 34 35 29 30 57 37 32 33 25 30 30 32 27 26 22 25 21 23 18 16 24 29 27 35 39 39 59
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