You do this in two steps:
First, you define the groups that should have different colours; either by adding another column to the data frame or inside aes
. I’ll use aes
here:
aes(wt, mpg, color = cut(mpg, breaks = c(0, 20, 25, Inf)))
Secondly, by specifying a manual colour or fill scale:
scale_color_manual(values = c('blue', 'green', 'red'),
limits = c('(0,20]', '(20,25]', '(25,Inf]'))
This specifies which colours to use (values
) and which labels to assign them to (limits
); these are the names of the grouping generated by cut
.
Taken together:
ggplot(mtcars) +
aes(wt, mpg, color = cut(mpg, breaks = c(0, 20, 25, Inf))) +
geom_point(size = 4) +
scale_color_manual(values = c('blue', 'green', 'red'),
limits = c('(0,20]', '(20,25]', '(25,Inf]'))
You can improve the legend title by adding the grouping as a separate column to your data, or by providing a guides
function call:
guides(color = guide_legend(title = 'mpg range'))
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…