Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
134 112 124 114 131 99 72 132 69 133 121 106 112 110 129 104 132 63 130 108 121 132 124 66 125 86 99 119 104 114 121 133 116 125 108 136 94 107 128 102 124 132 120 114 112 108 114 112 114 139 122 127 101 128 112 123 127 111 100 116 121 125 125 121 105 147 149 131 107 104 124 103 117 125 75 142 95 114 123 129 108 117 125 63 103 121 117 127 112 135 114 99 111 141 140 124 140 155 132 97 104 112 140 127 98 112 155 122 120 120
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