R中的繪圖函數中的45度線

Question

我有這樣的數據：

df <- data.frame(X=rnorm(10,0,1), Y=rnorm(10,0,1), Z=rnorm(10,0,1))

我需要將每個變量相互映射，所以我使用了

plot(df)

它將df中的每個變量與彼此完全相符。

但我想在每個子圖中添加45度線（其中x = y）。 我想知道怎么做？ 我也嘗試過循環但是由於“空間約束”它不會發生[實際上我在df中有5個變量]。 請幫忙。

謝謝

Answer 1

plot(df)調用pairs來繪制data.frames。 所以，使用這個答案 ，我們可以嘗試：

my_line <- function(x,y,...){
    points(x,y,...)
    segments(min(x), min(y), max(x), max(y),...)
}
pairs(df, lower.panel = my_line, upper.panel = my_line)