Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
263418000000 262752000000 266433000000 267722000000 266003000000 262971000000 265521000000 264676000000 270223000000 269508000000 268457000000 265814000000 266680000000 263018000000 269285000000 269829000000 270911000000 266844000000 271244000000 269907000000 271296000000 270157000000 271322000000 267179000000 264101000000 265518000000 269419000000 268714000000 272482000000 268351000000 268175000000 270674000000 272764000000 272599000000 270333000000 270846000000 270491000000 269160000000 274027000000 273784000000 276663000000 274525000000 271344000000 271115000000 270798000000 273911000000 273985000000 271917000000 273338000000 270601000000 273547000000 275363000000 281229000000 277793000000 279913000000 282500000000 280041000000 282166000000 290304000000 283519000000
Seasonal Period
12
12
1
2
3
4
6
12
Chart options
R Code
par1 <- as.numeric(par1) n <- length(x) sx <- sort(x) load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Variance Reduction Matrix',6,TRUE) a<-table.row.end(a) for (bigd in 0:2) { for (smalld in 0:3) { mylabel <- 'V(Y[t],d=' mylabel <- paste(mylabel,as.character(smalld),sep='') mylabel <- paste(mylabel,',D=',sep='') mylabel <- paste(mylabel,as.character(bigd),sep='') mylabel <- paste(mylabel,')',sep='') a<-table.row.start(a) a<-table.element(a,mylabel,header=TRUE) myx <- x if (smalld > 0) myx <- diff(x,lag=1,differences=smalld) if (bigd > 0) myx <- diff(myx,lag=par1,differences=bigd) a<-table.element(a,var(myx)) a<-table.element(a,'Range',header=TRUE) a<-table.element(a,max(myx)-min(myx)) a<-table.element(a,'Trim Var.',header=TRUE) smyx <- sort(myx) sn <- length(smyx) a<-table.element(a,var(smyx[smyx>quantile(smyx,0.05) & smyx<quantile(smyx,0.95)])) 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