Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
303506 303711 303907 304117 304323 304556 304798 305045 305309 305554 305786 306004 306208 306402 306588 306787 306984 307206 307439 307685 307946 308189 308418 308633 308833 309027 309212 309191 309376 309562 309767 309989 310218 310451 310657 310853 311042 311205 311367 311548 311729 311923 312139 312355 312587 312810 313003 313191 313373 313537 313705 313881 314052 314247 314449 314673 314909 315129 315341 315532 315701 315869 316041 316220 316395 316594 316799 317019 317253 317470 317679 317867 318032 318200 318373 318552 318728 318927 319133 319354 319588 319804 320013 320201 320367 320534 320707 320887 321062 321262 321467 321688 321922 322139 322348 322536
Name of dataseries
Source
Description
Season
12
12
6
4
No season
Chart options
Title:
Label y-axis:
Label x-axis:
Y-axis minimum
Y-axis maximum
R Code
if (par4 != 'No season') { par4 <- as.numeric(par4) if (par4 < 4) par4 <- 12 } summary(x) n <- length(x) bitmap(file='test1.png') if (par4=='No season') { plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n') axis(1,at=seq(1,n,10)) } if (par4!='No season') { plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n') axis(1,at=seq(1,n,par4)) grid(nx=0,ny=NULL,col='black') abline(v=seq(1,n,par4),col='black',lty='dotted') } 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