Qualitative colour scale with evenly spaced hues.

Usage

scale_colour_hue(..., h = c(0, 360) + 15, c = 100, l = 65, h.start = 0, direction = 1,
  na.value = "grey50")

scale_fill_hue(..., h = c(0, 360) + 15, c = 100, l = 65, h.start = 0, direction = 1,
      na.value = "grey50")

scale_colour_discrete(..., h = c(0, 360) + 15, c = 100, l = 65, h.start = 0, direction = 1,
      na.value = "grey50")

scale_fill_discrete(..., h = c(0, 360) + 15, c = 100, l = 65, h.start = 0, direction = 1,
      na.value = "grey50")

scale_color_discrete(..., h = c(0, 360) + 15, c = 100, l = 65, h.start = 0, direction = 1,
      na.value = "grey50")

scale_color_hue(..., h = c(0, 360) + 15, c = 100, l = 65, h.start = 0, direction = 1,
      na.value = "grey50")

Arguments

na.value
Colour to use for missing values
...
Other arguments passed on to discrete_scale to control name, limits, breaks, labels and so forth.
h
range of hues to use, in [0, 360]
c
chroma (intensity of colour), maximum value varies depending on
l
luminance (lightness), in [0, 100]
h.start
hue to start at
direction
direction to travel around the colour wheel, 1 = clockwise, -1 = counter-clockwise

Description

Qualitative colour scale with evenly spaced hues.

Examples

dsamp <- diamonds[sample(nrow(diamonds), 1000), ] (d <- qplot(carat, price, data=dsamp, colour=clarity))

# Change scale label d + scale_colour_hue()

d + scale_colour_hue("clarity")

d + scale_colour_hue(expression(clarity[beta]))

# Adjust luminosity and chroma d + scale_colour_hue(l=40, c=30)

d + scale_colour_hue(l=70, c=30)

d + scale_colour_hue(l=70, c=150)

d + scale_colour_hue(l=80, c=150)

# Change range of hues used d + scale_colour_hue(h=c(0, 90))

d + scale_colour_hue(h=c(90, 180))

d + scale_colour_hue(h=c(180, 270))

d + scale_colour_hue(h=c(270, 360))

# Vary opacity # (only works with pdf, quartz and cairo devices) d <- ggplot(dsamp, aes(carat, price, colour = clarity)) d + geom_point(alpha = 0.9)

d + geom_point(alpha = 0.5)

d + geom_point(alpha = 0.2)

# Colour of missing values is controlled with na.value: miss <- factor(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_hue(na.value = "black")