Smooth gradient between two colours

Usage

scale_colour_gradient(..., low = "#132B43", high = "#56B1F7", space = "Lab", na.value = "grey50", 
  guide = "colourbar")

scale_fill_gradient(..., low = "#132B43", high = "#56B1F7", space = "Lab", na.value = "grey50", 
      guide = "colourbar")

scale_colour_continuous(..., low = "#132B43", high = "#56B1F7", space = "Lab", na.value = "grey50", 
      guide = "colourbar")

scale_fill_continuous(..., low = "#132B43", high = "#56B1F7", space = "Lab", na.value = "grey50", 
      guide = "colourbar")

scale_color_continuous(..., low = "#132B43", high = "#56B1F7", space = "Lab", na.value = "grey50", 
      guide = "colourbar")

scale_color_gradient(..., low = "#132B43", high = "#56B1F7", space = "Lab", na.value = "grey50", 
      guide = "colourbar")

Arguments

guide
Type of legend. Use "colourbar" for continuous colour bar, or "legend" for discrete colour legend.
...
Other arguments passed on to discrete_scale to control name, limits, breaks, labels and so forth.
na.value
Colour to use for missing values
low
colour for low end of gradient.
high
colour for high end of gradient.
space
colour space in which to calculate gradient. "Lab" usually best unless gradient goes through white.

Description

Default colours are generated with munsell and mnsl(c("2.5PB 2/4", "2.5PB 7/10"). Generally, for continuous colour scales you want to keep hue constant, but vary chroma and luminance. The munsell package makes this easy to do using the Munsell colour system.

Examples

# It's hard to see, but look for the bright yellow dot # in the bottom right hand corner dsub <- subset(diamonds, x > 5 & x < 6 & y > 5 & y < 6) (d <- qplot(x, y, data=dsub, colour=z))

# That one point throws our entire scale off. We could # remove it, or manually tweak the limits of the scale # Tweak scale limits. Any points outside these limits will not be # plotted, and will not affect the calculation of statistics, etc d + scale_colour_gradient(limits=c(3, 10))

d + scale_colour_gradient(limits=c(3, 4))

# Setting the limits manually is also useful when producing # multiple plots that need to be comparable # Alternatively we could try transforming the scale: d + scale_colour_gradient(trans = "log")

d + scale_colour_gradient(trans = "sqrt")

# Other more trivial manipulations, including changing the name # of the scale and the colours. d + scale_colour_gradient("Depth")

d + scale_colour_gradient(expression(Depth[mm]))

d + scale_colour_gradient(limits=c(3, 4), low="red")

d + scale_colour_gradient(limits=c(3, 4), low="red", high="white")

# Much slower d + scale_colour_gradient(limits=c(3, 4), low="red", high="white", space="Lab")

d + scale_colour_gradient(limits=c(3, 4), space="Lab")

# scale_fill_continuous works similarly, but for fill colours (h <- qplot(x - y, data=dsub, geom="histogram", binwidth=0.01, fill=..count..))

h + scale_fill_continuous(low="black", high="pink", limits=c(0,3100))

# Colour of missing values is controlled with na.value: miss <- sample(c(NA, 1:5), nrow(mtcars), rep = TRUE) qplot(mpg, wt, data = mtcars, colour = miss)

qplot(mpg, wt, data = mtcars, colour = miss) + scale_colour_gradient(na.value = "black")