Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
1077 0 1043 120 0 71 121 121 0 121 111 0 127 114 0 129 14 0 130 99 0 131 122 0 132 132 0 132 0 0 136 136 0 137 3 0 137 9 0 141 1 0 142 142 0 144 2 0 149 136 0 152 136 0 158 0 0 159 128 0 161 141 0 189 31 0 190 6 0 192 0 0 200 164 0 208 0 0 208 0 172 216 0 0 222 184 0 242 11 0 249 3 0 290 275 0 305 276 0 306 40 0 344 335 0 610 449 0 741 470 0 782 782 0 120 47 0 124 1 0 124 0 0 125 101 0 126 0 0 127 4 0 128 0 59 131 120 0 133 0 0 135 5 0 135 24 0 137 81 0 139 24 0 140 18 0 142 0 0 142 0 0 143 0 0 145 88 0 147 21 0 148 27 0 150 108 0 153 21 0 154 152 0 157 0 0 158 17 0 175 0 0 178 17 0 178 21 0 190 188 0 191 167 0 192 178 0 192 71 0 193 14 0 195 19 0 195 16 0 207 0 0 218 218 0 219 30 0 224 9 0 227 0 0 228 209 0 234 0 0 234 108 0 242 0 0 244 0 0 259 240 0 273 0 182 286 33 0 291 5 0 343 0 0 568 104 0 134 43 0 134 75 0 138 114 0 140 119 0 142 112 0 144 131 0 155 138 0 167 147 0 177 0 177 179 3 0 179 0 158 182 4 0 210 201 0 224 201 0 248 9 0 273 255 0 293 0 0 410 11 0 430 415 0 452 0 0 454 451 0 520 520 0 586 556 0 617 407 210 659 644 0 759 0 734 924 15 0 941 917 0
Names of X columns:
DepDelay CarrierDelay Weather
R Code
library(corpcor) x <- t(y) (r1 <- pcor.shrink(x)) (r0 <- cor(x)) load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Pearson Correlation Matrix',1,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('r0'),'</pre>',sep='')) a<-table.row.end(a) a<-table.end(a) table.save(a,file='mytable0.tab') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Partial Pearson Correlation Matrix (Shrinkage Method)',1,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,paste('<pre>',RC.texteval('r1'),'</pre>',sep='')) a<-table.row.end(a) a<-table.end(a) table.save(a,file='mytable1.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