GGally::ggpairs
отображает приятные графики, например следующие. Единственное, что я пытаюсь уточнить, - это удалить все линии сетки в верхней части графика, где коэффициент корреляции. Возможно, также нарисуйте прямоугольник вокруг каждого верхнего графика.
library("GGally")
data(iris)
ggpairs(iris[, 1:4], lower=list(continuous="smooth", params=c(colour="blue")),
diag=list(continuous="bar", params=c(colour="blue")),
upper=list(params=list(corSize=6)), axisLabels='show')