Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
0.00509986101484714 -0.367556066315499 -0.0537354466224309 -0.166704772282988 -0.126300049308617 0.327023686536905 0.692054233801963 -0.417564341193504 -0.232739197967506 0.158028515484774 0.141962601907719 0.0977015093305773 0.178499162542409 0.354710779485382 -0.354746935306964 0.0473075914423155 0.12548482811567 0.049678532976494 0.399090003338055 -0.246526990945034 0.21685291463498 -0.219593868435001 0.0652702639292979 -0.0665262770468571 0.308815292012484 -0.424601314868768 0.145355814680874 -0.0441183515794435 -0.221659463846152 0.122084195491148 0.0536801423020546 0.148492555999408 0.24474869125267 0.278323125606182 -0.309036135905256 0.264314084072332 0.17628378438955 0.241921702176668 -0.0565203845695072 0.238898007832185 0.108691572225452 0.343634820779181 0.0945164374426331 0.286201922339716 0.169943261563564 0.0957444165846209 -0.0751006897446516 0.135229078535882 0.636783916469131 0.143957130800366 -0.0621808412835195 -0.179444688104042 -0.0242396923945499 -0.0669552206506127 0.122304332221848 0.122161018305001 0.0441032730401381 0.193670631917222 -0.00500574026816254 -0.0808552739975925 0.0558677003038862 -0.250407187862639 0.193849819804146 0.414954798600835 -0.461344114086046 0.155266476855029 0.119974629604623 -0.0358831783828276 0.33240331269403 0.13904839615431 0.0356716080180407 -0.130743874142015 0.203701793870735 -0.332119742643951 0.2858057337555 -0.00330579177147433 0.05277378155592
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