如何在R中绘制相关矩阵之上的相关图？

Question

我已按照本网站from STHDA上的说明在R中绘制相关矩阵和相关图。网站和示例非常好。但是，我想在相关矩阵的上半部分绘制相关图的上半部分。

以下是代码：

library(PerformanceAnalytics)
chart.Correlation(mtcars, histogram=TRUE, pch=19)

这应该给我一个使用散点图的相关矩阵，以及我想要维持的直方图。但是对于图的上半部分，我想从这段代码中获得相关图：

library(corrplot)
corrplot(cor(mtcars), type="upper", order="hclust", tl.col="black", tl.srt=45)

这样做的显而易见的方法是以pdf格式导出所有图形，然后使用 Inkscape ，但如果我可以直接从R中获取它，那会更好。有没有可行的方法来做到这一点？

感谢。

Answer 1

在pairs中可以找到使用help(pairs)中的面板功能的技巧：

  

面板功能不应该尝试开始新的绘图，而只是在给定的坐标系内绘图：因此＆＃39;绘图＆＃39;和＆＃39; boxplot＆＃39;不是面板功能。

因此，您应该使用graphic- 添加功能，例如points，lines，polygon，或者可能（如果可用）{{1} }，但不是一个直接的情节。您在评论中提出的建议（使用plot(..., add=TRUE)）可能会有一些刺激，如果您真的试图将其绘制在设备副上，只需从绘图功能中返回它。

在我下面的例子中，我实际上做了＃34;创建了一个新的情节＆＃34;，但我作弊（基于this SO post）通过在已存在的那个上面添加第二个情节。我这样做是为了快速执行其他必要的缩放/移位，这仍然不是完美的，因为你似乎想要一个完美的圆圈＆＃34;，只有SpatialPolygons才能保证这一点（宽高比）固定为1：1）。

asp=1

您可以通过玩半径来操纵圆圈的大小 - 以无偏见的可视化为代价。我直接从您最初链接的页面中获取的颜色。

类似的功能可用于下方和对角线面板。