Colorbar from custom colorRampPalette

by

I made a nice flexible function awhile ago to do this.

# Function to plot color bar
color.bar <- function(lut, min, max=-min, nticks=11, ticks=seq(min, max, len=nticks), title="") {
    scale = (length(lut)-1)/(max-min)

    dev.new(width=1.75, height=5)
    plot(c(0,10), c(min,max), type="n", bty='n', xaxt="n", xlab='', yaxt="n", ylab='', main=title)
    axis(2, ticks, las=1)
    for (i in 1:(length(lut)-1)) {
     y = (i-1)/scale + min
     rect(0,y,10,y+1/scale, col=lut[i], border=NA)
    }
}

Then you can do something like:

> color.bar(colorRampPalette(c("light green", "yellow", "orange", "red"))(100), -1)

enter image description here

More examples at: http://www.colbyimaging.com/wiki/statistics/color-bars

More Related Contents:

  1. Plot multiple lines (data series) each with unique color in R
  2. Plot with conditional colors based on values in R [duplicate]
  3. Change bar plot colour in geom_bar with ggplot2 in r
  4. Create discrete color bar with varying interval widths and no spacing between legend levels
  5. asymmetric color distribution in scale_gradient2?
  6. How to fill geom_polygon with different colors above and below y = 0 (or any other value)?
  7. Fill and border colour in geom_point (scale_colour_manual) in ggplot
  8. Colouring plot by factor in R
  9. How to make gradient color filled timeseries plot in R
  10. How do I change the color value of just one value in ggplot2’s scale_fill_brewer?
  11. Stacked barplot with colour gradients for each bar
  12. ggplot2: How to specify multiple fill colors for points that are connected by lines of different colors
  13. Is it possible to define the “mid” range in scale_fill_gradient2()?
  14. Colour points in a plot differently depending on a vector of values
  15. Different colours of geom_line above and below a specific value
  16. Increase resolution of color scale for values close to zero
  17. How to color sliderbar (sliderInput)?
  18. How to fill with different colors between two lines? (originally: fill geom_polygon with different colors above and below y = 0 (or any other value)?)
  19. Creating a density histogram in ggplot2?
  20. Remove lines from color and fill legends
  21. using two scale colour gradients on one ggplot [duplicate]
  22. Change colours of particular bars in a bar chart
  23. ggplot: colour points by groups based on user defined colours
  24. Consistent color scale and legend between plots when not all levels of a grouping variable are present in the data
  25. Different colour palettes for two different colour aesthetic mappings in ggplot2
  26. Is there a way to output text to the R console in color
  27. ggplot2: Fix colors to factor levels
  28. R – ggplot line color (using geom_line) doesn’t change
  29. Creating a vertical color gradient for a geom_bar plot
  30. ggplot scale color gradient to range outside of data range

Leave a Comment