Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
0.065008 0.614385 -0.0612015 -0.00970663 -0.256396 -0.0334837 -0.0689857 -0.205761 -0.292333 0.00543114 0.188343 -0.0485756 0.00555253 -0.00145092 -0.191393 -0.11277 0.100612 0.0158982 0.190324 0.0889821 0.0698743 0.317928 -0.133659 0.312264 0.00984158 0.0829983 0.126642 -0.113456 -0.041469 0.0869908 -0.129557 0.285798 -0.104212 -0.128314 0.126813 -0.0584557 -0.274956 -0.12781 0.0339588 0.1215 0.155794 0.0174826 0.117349 -0.106688 -0.0237018 -0.0885253 0.465927 -0.0607347 -0.155919 0.0432765 0.379367 0.274174 -0.228707 0.116483 0.0271189 -0.175179 0.432758 -0.0529622 0.0418453 -0.156124 0.518991 -0.18914 -0.179215 -0.448808 -0.448808 -0.125741 -0.14101 -0.113747 -0.185406 -0.0515179 0.0841505 0.117427 -0.0795998 -0.0267584 0.157878 -0.165159 -0.097565 0.173002 0.192459 -0.0706746 0.00011202 0.111336 -0.056015 0.423349 -0.116928 -0.0536678 0.0437169 -0.181422 0.178634 -0.0187421 -0.024783 -0.0123265 -0.103544 0.178845 0.134319 -0.0833277 -0.0342747 -0.445629 -0.502276 0.306649 -0.123462 -0.196056 0.132538 0.15367 -0.185935 -0.142621 0.225841 -0.101053 -0.112683 0.233693 0.246468 0.19679 0.066871 0.207964 0.0551443 -0.0122079 -0.440077 0.543393 -0.0654679 -0.0503542 0.193905 0.340426 0.252604 -0.187355 -0.0914265 -0.0818456 0.0937488 0.216988 -0.0704913 -0.0914546 -0.232625 0.220585 -0.0873974 0.170289 0.208884 0.0271189 0.153569 -0.185329 -0.0626741 -0.194083 0.429459 -0.093256 0.0060243 -0.00117237 -0.226083 0.0850623 0.110395 -0.197992 -0.151158 -0.0340396 -0.203308 -0.226013 -0.134441 -0.175179 -0.103136 -0.266117 0.208884 0.166159 0.283489 -0.216941 0.392504 -0.098643 -0.18259 -0.178074 -0.166593 -0.219154 0.013528 0.44255 -0.0796371 0.146073 -0.699505
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