Eu criei um gráfico simples em R (versão R versão 3.0.1 (2013-05-16)) usandoggplot2 (versão 0.9.3.1) que mostra os coeficientes de correlação para um conjunto de dados. Atualmente, a legenda colorbar no lado direito da plotagem é uma fração do tamanho total da plotagem.

Eu gostaria que a legenda colorbar tivesse a mesma altura que a plotagem. Eu pensei que eu poderia usar olegend.key.height para fazer isso, mas descobri que não é o caso. Eu investiguei ogrid pacoteunit função e descobriu que havia algumas unidades normalizadas lá, mas quando eu tentei (unit(1, "npc")), o colorbar era muito alto e saiu da página.

Como posso fazer a legenda a mesma altura que a trama em si?

Um exemplo completo é abaixo:

# Load the needed libraries
library(ggplot2)
library(grid)
library(scales)
library(reshape2)

# Generate a collection of sample data
variables = c("Var1", "Var2", "Var3")
data = matrix(runif(9, -1, 1), 3, 3)
diag(data) = 1
colnames(data) = variables
rownames(data) = variables

# Generate the plot
corrs = data
ggplot(melt(corrs), aes(x = Var1, y = Var2, fill = value)) +
  geom_tile() +
  geom_text(parse = TRUE, aes(label = sprintf("%.2f", value)), size = 3, color = "white") +
  theme_bw() +
  theme(panel.border = element_blank(),
        axis.text.x = element_text(angle = 90, vjust = 0.5, hjust = 1),
        aspect.ratio = 1,
        legend.position = "right",
        legend.key.height = unit(1, "inch")) +
        labs(x = "", y = "", fill = "", title = "Correlation Coefficients") +
        scale_fill_gradient2(limits = c(-1, 1), expand = c(0, 0),
                             low = muted("red"),
                             mid = "black",
                             high = muted("blue"))