R 如何将x=y线添加到散点图矩阵？

我想在散点图矩阵的散点图中添加一条x=y线，如下所示：

有没有人知道一个函数可以用一个简单的选项来实现这一点？ 到目前为止，我尝试了car package中的pairs和scatterplotMatrix，但在论坛中找不到这样的选项，也没有类似的问题。 我希望你能在没有可复制数据的情况下看到问题。。。 非常感谢

---

PS：我知道如何手动创建这样一个绘图，一个接一个地绘制一个零件图——如果省略这项工作并使用一个选项来完成，那将是一件好事。请，我不想浪费您的时间来解释这些解决方案。

您可以将

GGally

包与

ggplot2

一起使用。请参见

ggpairs

中的最后一个示例

因此，只需添加

geom_线（aes（x=…y…）

，即可将图层添加到各个绘图中。（

.y..

），允许您在内部引用y字段——这是一个必要的技术性问题）

库（GGally）
图书馆（GG2）
GGally:：ggpairs（数据=cars，诊断=T）
定制车您可以将
GGally
软件包与
ggplot2
一起使用。请参见
ggpairs
中的最后一个示例

因此，只需添加
geom_线（aes（x=…y…）
，即可将图层添加到各个绘图中。（
.y..
），允许您在内部引用y字段——这是一个必要的技术性问题）

库（GGally）
图书馆（GG2）
GGally:：ggpairs（数据=cars，诊断=T）
custom_car如前所述，通过使用数据集替换iris，以下代码应该可以工作

pairs(iris, panel= function(x,y,...){ 
        points(x,y); 
        abline(a=0, b=1)}) 

如前所述，通过使用数据集替换iris，以下代码应该可以工作

pairs(iris, panel= function(x,y,...){ 
        points(x,y); 
        abline(a=0, b=1)})