Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
12584 9441 18960 21480 10766 13059 8589 4965 4803 7240 10906 8561 6389 14372 18149 6309 13051 12754 10860 9574 19110 29585 21122 14522 17330 18119 10902 29158 16065 10376 10999 17950 15418 12618 16561 8022 9567 9045 8172 13708 11259 10518 9301 5197 11259 10518 9301 5197 6758 7304 7628 14265 13054 15336 14682 27804 16022 24009 32613 19111
R Code
library(moments) agostino <- agostino.test(x) anscombe <- anscombe.test(x) geary <- geary(x) jarque <- jarque.test(x) load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Skewness and Kurtosis Test',1,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('agostino'),'</pre>',sep='')) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('anscombe'),'</pre>',sep='')) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('jarque'),'</pre>',sep='')) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('geary'),'</pre>',sep='')) 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