Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
17.5 595 127 19.1 602 128 19.7 581 155 19.8 593 145 20.2 589 143 20.6 600 143 21.4 622 144 22.8 633 154 23.2 680 155 23.3 669 154 23.3 663 157 23.3 668 155 23.4 692 157 23.6 697 163 24.1 702 166
Names of X columns:
Inkomen uitgaven_buitenland_pp uitgaven_binnenland_pp
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
1 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation