Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
-5.7797 2.3106 2.3050 1.6084 0.9359 0.8410 -1.4934 1.9359 -0.2078 1.3704 2.0813 4.9373 -2.6380 -1.1918 1.0157 0.3050 2.6042 1.0237 0.9746 -1.1942 0.7144 0.9353 0.6363 0.4375 2.9156 -0.7639 1.8375 2.1850 0.1074 0.8088 -0.7729 3.0765 -0.3014 1.4452 -0.7774 -0.0225 -0.9328 1.3474 -7.7450 2.0373 1.8945 -1.1117 1.8935 0.0199 1.9678 1.0725 -1.0831 -2.1480 2.4189 2.1110 -0.9187 8.4453 1.5808 0.3464 2.1910 0.8711 -0.1514 -2.2657 1.4203 2.5314 -2.1197 -1.2496 -1.2496 2.6464 -0.6219 1.9359 -1.8004 -2.9897 -0.8172 -2.3749 2.7285 -0.1293 -3.5056 0.8162 2.1073 -2.5234 -3.4915 0.4380 -1.9008 0.5763 -3.1066 2.6406 -0.2410 2.6604 -2.0153 -0.0602 1.0020 0.5289 0.9247 1.0644 -2.5956 -0.4699 -1.6685 1.5566 -0.1976 1.4381 2.2825 2.1591 0.1205 -0.8777 -2.3585 -0.6410 -0.5862 -0.5716 1.7669 0.6391 -0.7112 -0.1851 1.4405 -4.0127 -1.3848 0.8874 1.7689 3.5030 1.1323 1.9408 3.9656 2.4715 0.8891 3.1072 -0.7460 -4.2621 -3.3962 -5.8006 -0.0473 -1.7644 0.3991 -1.2022 -1.0225 -1.6434 0.2564 2.0910 -2.3134 -0.7273 0.0941 0.4584 0.8319 -1.6382 -3.7079 -0.8683 0.7808 2.1744 -2.9235 1.1289 -4.6287 -5.5422 -2.4148 -6.8916 0.0548 -2.1177 -3.4201 0.6937 1.6285 1.1241 0.1659 0.0359 1.3518 -1.0570 -0.9408 -0.7914 0.5343 2.1428 0.3855 -0.1554 0.7077 -1.6968
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