Korrelation in R

Question

Ich versuche, die gleiche Grafik wie in example, aber mit anderen Daten zu produzieren. Hier ist mein Code:

library(SciViews) 

args <- commandArgs(TRUE) 
pdfname <- args[1] 
datafile <- args[2] 

pdf(pdfname) 
eqdata = read.csv(datafile , header = T,sep=",") 
(longley.cor <- correlation(eqdata$feqs)) 
# Synthetic view of the correlation matrix 
summary(longley.cor) 
p <- plot(longley.cor) 
print(p) 
dev.off() 

und die Daten

ques,feqs 
"abc",20 
"def",10 
"ghi",40 
"jkl",10 
"mno",20 
"pqr",10 

Ich verwende diesen Befehl

Rscript ./rscript/correlation.R "/home/co.pdf" "/home/data_correlation.csv" 

-Code Ausgabe

Ich möchte ähnliche

Answer 1

Sie versuchen, die plotcorr Funktion im ellipse Paket kann generieren. Die Hilfeseiten gibt unter anderem folgendes Beispiel:

Welche scheint zu sein, was Sie suchen?

Edit:

Sie Text danach hinzufügen können, werden die Kreise auf 1 gesetzt - Anzahl von Vars Gitter. Z.B .:

data(mtcars) 
Corrmat <- cor(mtcars) 
cols <- ifelse(Corrmat>0, rgb(0,0,abs(Corrmat)), rgb(abs(Corrmat),0,0)) 

library(ellipse) 
plotcorr(Corrmat,col=cols) 

n <- nrow(Corrmat) 
for (i in 1:n) 
{ 
    for (j in 1:n) 
    { 
     text(j,i,round(Corrmat[n-i+1,j],2),col="white",cex=0.6)  
    } 
}