Bagaimana cara menambahkan garis regresi ke matriks sebar?

Bagaimana cara menambahkan garis regresi ke matriks sebar? Saya memiliki skrip berikut:

NewNEMSIS = read.csv("NewNEMSIS.csv")
library(gclus)
newmatrix = NewNEMSIS[,2:5]
newmatrix.r = abs(cor(newmatrix))
newmatrix.col = dmat.color(newmatrix.r)
area = NewNEMSIS$area
cpairs(newmatrix[which(area=="A"),c('Response','SceneToPatient','TotalScene','TotalCall')], panel.colors=newmatrix.col, gap=.5, main="Scatterplot Matrix of City A Times", ylim=c(0,60), xlim=c(0,60), na.omit=TRUE, )

Bagaimana cara menambahkan garis regresi bergaris atau miring ke plot sebar ini sambil mempertahankannya dalam bentuk matriks? Terima kasih!


rstudio r console regression scatter-plot
person bubbalouie    schedule 28.11.2014    source sumber

Jawaban (1)


arrow_upward
5
arrow_downward

cpairs hanyalah versi berwarna dari fungsi grafik dasar pairs, dan dengan melihat kodenya, Anda dapat melihat bahwa ia menerima serangkaian fungsi panel biasa yang dijelaskan dan diilustrasikan dalam ?pairs. Ini adalah contoh yang dapat direproduksi (yang bukan milik Anda):

require(gclus)
png();   judge.cor <- cor(USJudgeRatings)
         judge.color <- dmat.color(judge.cor)
?pairs
#Review the panel functions
?cpairs  
cpairs(USJudgeRatings,panel.colors=judge.color,pch=".",gap=.5, 
        upper.panel=panel.smooth)
dev.off()

masukkan deskripsi gambar di sini

Anda harus belajar memposting contoh yang menggambarkan masalahnya. Kami tidak memiliki cara untuk mengetahui apa yang ada di file .csv itu sehingga menunjukkan bahwa Anda melakukan operasi itu tidak ada gunanya dalam memahami apa yang sedang terjadi (di atas mengetahui bahwa hasilnya adalah kerangka data). Tidak masalah menggunakan contoh dari halaman bantuan fungsi yang Anda tanyakan.

person IRTFM    schedule 28.11.2014
comment
Apakah ada cara untuk melapisi panel.smooth dengan panel.color. Saya juga melakukan hal yang sama, tetapi tersandung dengan ini. (tambah satu) - person akrun; 28.11.2014
comment
Jika itu tujuannya, Anda perlu meretas cpairs atau membuat duplikat fungsi internal yang diteruskan cpairs ke panel dan kemudian memberikannya ke panel atas atau panel bawah. - person IRTFM; 28.11.2014