Search code examples
rggplot2

How to set fixed continuous colour values in ggplot2


I'm plotting a lot of graphics and I'd like for all of them to have the same colour scale so I can compare one to another. Here's my code:

myPalette <- colorRampPalette(rev(brewer.pal(11, "Spectral")))
print(ggplot(mydata, aes(x= X, y= Y, colour= Z)) + geom_point(alpha=.5,size = 6) + scale_colour_gradientn(colours = myPalette(100)) + ylim(.1,.4) + xlim(1.5,2) + ggtitle(title))

Is there a way to set this colour scale?


Solution

  • Do I understand this correctly? You have two plots, where the values of the color scale are being mapped to different colors on different plots because the plots don't have the same values in them.

    library("ggplot2")
    library("RColorBrewer")
    ggplot(subset(mtcars, am==0), aes(x=wt, y=mpg, colour=carb)) + 
      geom_point(size=6)
    

    enter image description here

    ggplot(subset(mtcars, am==1), aes(x=wt, y=mpg, colour=carb)) + 
      geom_point(size=6)
    

    enter image description here

    In the top one, dark blue is 1 and light blue is 4, while in the bottom one, dark blue is (still) 1, but light blue is now 8.

    You can fix the ends of the color bar by giving a limits argument to the scale; it should cover the whole range that the data can take in any of the plots. Also, you can assign this scale to a variable and add that to all the plots (to reduce redundant code so that the definition is only in one place and not in every plot).

    myPalette <- colorRampPalette(rev(brewer.pal(11, "Spectral")))
    sc <- scale_colour_gradientn(colours = myPalette(100), limits=c(1, 8))
    
    ggplot(subset(mtcars, am==0), aes(x=wt, y=mpg, colour=carb)) + 
      geom_point(size=6) + sc
    

    enter image description here

    ggplot(subset(mtcars, am==1), aes(x=wt, y=mpg, colour=carb)) + 
      geom_point(size=6) + sc
    

    enter image description here