# Example scale
values <- c("group A:value 1", "group A:value 2", "group B:value 1")
template <- scale_colour_hue(limits = values)
# Treat the 'group X' part as groups
key <- key_group_split(sep = ":")
key(template)
# Treat the 'value X' part as groups
key <- key_group_split(sep = ":", reverse = TRUE)
key(template)
# Example scale
template <- scale_colour_hue(limits = msleep$name[c(1, 7, 9, 23, 24)])
# A lookup table can have more entries than needed
key <- key_group_lut(msleep$name, msleep$order)
key(template)
# Or less entries than needed
key <- key_group_lut(
msleep$name[23:24], msleep$order[23:24],
ungrouped = "Other animals"
)
key(template)
Run the code above in your browser using DataLab