GGally :: ggpairs plot sem linhas de grade ao plotar coeficiente de correlação

GGally::ggpairs traça bons gráficos como o seguinte. A única coisa que busco refinar ainda mais é remover todas as linhas de grade na parte superior do gráfico, onde é o coeficiente de correlação. Um talvez também desenhe um retângulo em torno de cada gráfico superior.

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')

questionAnswers(1)

yourAnswerToTheQuestion