Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
-1.487 -5.985 -1.321 -1.166 -6.644 -6.888 -2.658 1.091 -1.360 -3.487 -6.913 -2.481 -7.666 -1.600 -3.034 -4.453 -0.378 -2.664 -3.534 -4.186 -1.998 -6.336 -1.005 -3.701 -0.767 -2.501 -4.114 -0.137 0.788 -3.861 -1.061 -3.603 -2.059 -6.843 -3.904 -5.072 -2.035 -2.823 -2.007 -0.197 -5.946 -1.939 -7.411 -2.887 -1.251 -2.266 0.846 -3.583 -1.347 -5.070 0.929 0.052 -0.895 -4.342 -2.190 -0.699 -0.287 -2.612 -6.472 1.350 -2.157 0.276 -5.598 -0.900 -4.198 0.778 -5.006 -2.725 -3.821 -2.818 0.186 -0.367 -3.474 -1.378 -3.589 0.273 -7.245 0.164 -0.925 -0.442 -0.824 -1.537 -5.231 -2.076 1.712 -1.368 -7.309 -2.757 -1.804 -1.162 -0.318 -3.720 0.870 0.739 -6.483 -3.018 -3.123 -4.548 -2.938 -5.751 -0.568 1.655 -4.940 -0.900 -1.532 -2.707 -3.183 1.874 -3.925 1.367 -6.436 -4.525 -2.913 -0.725 -0.749 -7.504 0.747 4.787 4.399 1.372 1.127 1.102 3.638 -0.617 2.367 3.943 4.227 -2.177 0.677 3.219 -1.158 3.873 1.413 1.789 0.725 2.277 1.864 0.772 -0.073 4.681 -1.821 4.589 1.486 -0.096 4.870 1.883 5.190 2.782 2.663 3.150 -0.062 -0.854 1.451 2.240 3.902 -2.788 1.859 4.193 3.135 2.640 1.297 3.475 2.908 0.542 -0.459 4.593 4.115 2.577 5.598 3.612 -1.009 4.990 3.041 1.815 -1.060 3.153 4.731 0.571 1.573 1.678 5.072 -0.334 5.793 1.789 -3.582 -0.612 0.782 5.035 2.989 0.113 2.534 4.750 0.264 -0.674 1.404 -1.553 3.575 -1.945 5.693 1.435 1.216 1.177 2.274 2.749 3.135 1.189 1.153 0.836 3.402 0.994 2.766 -1.232 0.587 0.448 7.043 3.987 -0.248 2.295 -0.730 2.329 2.601 -0.402 3.105 0.644 4.786 -0.439 1.934 4.889 -2.610 -0.539 4.060 5.784 3.580 4.855 2.863 5.202 6.030 5.516 4.756 1.549 -0.238 -1.379 -7.100 1.313 0.102 -1.062 0.533 0.638 0.763 2.033 4.162 4.790 -1.710 2.054 3.725 0.865 3.205 0.907 -0.817 -0.175 2.255 2.883 -0.413 3.215 -3.397 -3.780 -0.313 -5.196 -1.912 0.424 -3.252 1.998 4.161 1.310 1.712 3.599 3.910 -0.419 3.491 0.632 3.534 4.501 2.317 1.147 3.881 -2.694 NA
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
1 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation