Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
0.00913254578599758 0.00285231361829643 -0.00504471126830556 0.00472883788539909 -0.0228148157690941 0.0146665204163619 -0.00810573403592854 -0.0537902497935497 -0.0511969592456 -0.036629324943988 0.0172327210719726 -0.00406124976408262 0.0267302339734289 0.00605993598803868 -0.0239581305825598 0.0276030625007219 0.0158294581963435 -0.00278529952257839 -0.0323368683613167 0.0519538577563155 -0.0230502843225087 0.0395917857021715 0.0190140226593555 -0.025008220349288 0.0339148272685651 -0.0200956061184338 0.000429046218818689 0.0376056546728016 0.00143910420847144 0.0415186157615298 0.0190919406343806 -0.044450625443882 -0.0361722262778951 0.0415517253286448 0.0061401037776073 0.0386536050903804 0.0120399878680985 -0.00501849326382575 0.028384784122329 0.0298564977321742 -0.0246158805447327 -0.00565133555237002 0.0259374886869223 0.018761649609134 0.0173007305055357 -0.00314632022827562 -0.0494901561831343 0.0173008967948498 0.0146601843263029 0.0156961589027556 -0.018017188877978 -0.00592101599993956 0.0169682530791193 -0.000527171113346208 0.0176361912685677 -0.0196841369078824 0.0413711658477857 0.0175584203326637 -0.00177708604679722 0.00565727906461655 0.0383267373422207 0.0284252431837836 0.0174866265834957 -0.0485917340232007
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