Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
665711522864641 -131165385652759 -179603040001339 -184700692903106 -124145048268355 149556723027767 138355409772499 -304979696402705 -357176204304957 -127320953176455 145927737668894 -0.178846909964642 -0.985432102017027 -105306121468615 -105564749163737 472629131013776 -189226312212085 -820821017545145 -0.861723966126757 266933674420407 138192403862728 237755568035564 -936782864394663 -130354295863332 123319796509373 902555629852805 -234568489161739 -279801464674306 -0.496994929667013 -291462589106662 -719380487713189 14530304956098 -118141210432007 -493193696268312 175883125841397 295332082649383 843177239016013 -241014670355359 -984459574846234 196667953743618 148527485009665 -127654824550164 -969597160917218 -156681290524712 -193938797503698 698751026062598 768064392240282 866634370891604 291604413287932 -0.122556332769761 136192376132819 -211450669372579 846393425485531 -180235308927727 -169747970461711 -0.0232046116050384 151206101468734 -150385250031436 0.328433967228775 -59890446520356 -839752265087017 -274043155495818 -865489806363659 259683327400853 -126268943677433 480932734750565 -86892260418941 0.844047044806452 -502461501280509 232879449607947 -254529687030544 -0.771701965602397 -4072107929342 -0.256484732548137 -118890184314072 -472056838135867 212418797357859 443542031337181
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