Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
0.7923 -2.468 -2.996 3.119 0.04315 0.731 2.45 2.119 -1.429 -1.644 -3.065 -1.461 1.141 1.329 0.3396 0.8429 2.225 -1.924 0.4999 -0.6433
Sample Range:
(leave blank to include all observations)
From:
To:
Maximum order
6
6
1
2
3
4
5
6
R Code
par1 <- as.numeric(par1) library(e1071) load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Moments - Ungrouped Data',3,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Order',1,TRUE) a<-table.element(a,'Uncentered',1,TRUE) a<-table.element(a,'Centered',1,TRUE) a<-table.row.end(a) for (i in 1:par1) { a<-table.row.start(a) a<-table.element(a,i,header=TRUE) a<-table.element(a,moment(x,order=i,center=F,absolute=F,na.rm=T)) a<-table.element(a,moment(x,order=i,center=T,absolute=F,na.rm=T)) 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