Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
104 54 33 81 69 40 101 81 38 92 55 47 83 29 32 101 45 46 64 47 51 57 28 11 108 89 68 121 62 39 99 56 27 109 54 40 96 77 25 88 44 27 91 73 32 71 44 25 85 43 35 93 47 37 64 41 18 48 34 18 96 73 58 95 72 38 74 32 27 91 51 48
Names of X columns:
Vlaams Waals Brussels
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