guide_legend(title = waiver(), title.position = NULL, title.theme = NULL, title.hjust = NULL, title.vjust = NULL, label = TRUE, label.position = NULL, label.theme = NULL, label.hjust = NULL, label.vjust = NULL, keywidth = NULL, keyheight = NULL, direction = NULL, default.unit = "line", override.aes = list(), nrow = NULL, ncol = NULL, byrow = FALSE, reverse = FALSE, order = 0, ...)
NULL, the title is not
shown. By default (waiver), the name of the
scale object or tha name specified in labs
is used for the title.element_text is
expected. By default, the theme is specified by
legend.title in theme or theme.TRUE then the labels are
drawn. If FALSE then the labels are invisible.element_text is
expected. By default, the theme is specified by
legend.text in theme or theme.legend.key.width or legend.key.size in
theme or theme.legend.key.height or legend.key.size in
theme or theme.keywidth and keyheight.FALSE (the default) the
legend-matrix is filled by columns, otherwise the
legend-matrix is filled by rows.TRUE the order of
legends is reversed.A guide object
Legend type guide shows key (i.e., geoms) mapped onto values. Legend guides for various scales are integrated if possible.
Guides can be specified in each scale or in
guides. guide="legend" in scale is
syntactic sugar for guide=guide_legend(). As for
how to specify the guide for each scales in more detail,
see guides.
library(reshape2) # for melt df <- melt(outer(1:4, 1:4), varnames = c("X1", "X2")) p1 <- ggplot(df, aes(X1, X2)) + geom_tile(aes(fill = value)) p2 <- p1 + geom_point(aes(size = value)) # Basic form p1 + scale_fill_continuous(guide = "legend")
# title text styles via element_text p1 + guides(fill = guide_legend( title.theme = element_text(size=15, face="italic", colour = "red", angle = 45)))
# label styles p1 + scale_fill_continuous(breaks = c(5, 10, 15), labels = paste("long", c(5, 10, 15)), guide = guide_legend(direction = "horizontal", title.position = "top", label.position="bottom", label.hjust = 0.5, label.vjust = 0.5, label.theme = element_text(angle = 90)))
# Set aesthetic of legend key # very low alpha value make it difficult to see legend key p3 <- qplot(carat, price, data = diamonds, colour = color, alpha = I(1/100)) p3
# override.aes overwrites the alpha p3 + guides(colour = guide_legend(override.aes = list(alpha = 1)))
# multiple row/col legends p <- qplot(1:20, 1:20, colour = letters[1:20]) p + guides(col = guide_legend(nrow = 8))