Как сохранить аблайн в границах коррплота?

Question

Я пытаюсь добавить abline к corrplot, но линия выходит за границы.Как сохранить линию в пределах оси corrplot?

Вот код:

library(corrplot)
M <- cor(mtcars)
corrplot(M, method = "circle")
abline(v=c(2.5,5.5), col=c("black", "black"), lty=c(2,2), lwd=c(3, 3))

Также как добавить метки x и y к изображению?

Answer 1

abline распространяется по всему пространству.Но вы можете использовать lines для указания начала и конца каждой строки.Центры каждого квадрата в corrplot начинаются с (1,1) слева внизу и увеличиваются на 1 с каждым квадратом.Вы можете использовать это, чтобы получить необходимые начало и конец для ваших линий:

corrplot(M, method = "circle")
lines(c(2.5, 2.5), c(0, 12), lwd=3, lty=2)
lines(c(5.5, 5.5), c(0, 12), lwd=3, lty=2)

Чтобы добавить метки, просто используйте функцию title:

title(xlab="x label", ylab="y label")

И вот результат: