Tentando seguir um exemplo feito aqui, eu estava reproduzindo o seguinte código:

# Load required packages
require(GGally)

# Load datasets
data(state)
df <- data.frame(state.x77,
                 State = state.name,
                 Abbrev = state.abb,
                 Region = state.region,
                 Division = state.division
) 
# Create scatterplot matrix
p <- ggpairs(df, 
             # Columns to include in the matrix
             columns = c(3,5,6,7),

             # What to include above diagonal
             # list(continuous = "points") to mirror
             # "blank" to turn off
             upper = "blank",
             legends=T,

             # What to include below diagonal
             lower = list(continuous = "points"),

             # What to include in the diagonal
             diag = list(continuous = "density"),

             # How to label inner plots
             # internal, none, show
             axisLabels = "none",

             # Other aes() parameters
             colour = "Region",
             title = "State Scatterplot Matrix"
) 

# Show the plot
print(p)

Eu deveria ter uma imagem com legenda para cada enredo.

Mas, em vez disso, estou recebendo um sem nenhuma lenda.

Alguma dica de por que a imagem que estou recebendo não tem as lendas? Meu caso particular precisa deles!

Estou usando a versão 3.2.2 e tentei tanto no RStudio quanto no RGui.

Desde já, obrigado!