Learn R Programming

fields (version 4.3)

tim.colors: Some useful color tables for images.

Description

Two color scales useful for image plots: a pleasing rainbow style color table patterned after that used in Matlab by Tim Hoar and also a simple colr interpolation between two colors passing through white.

Usage

tim.colors(n = 64)
two.colors(n=256, start="darkgreen", end="red", middle="white")
designer.colors( n=256, col= c("darkgreen", "white", "darkred"),
                              x= seq(0,1,, length(col)) )

Arguments

Value

A vector of character strings giving the colors in a hexadecimal format.

Details

The color in R can be represented as three vectors in RGB coordinates and these coordinates are interpolated separately using a cubic spline to give color values that intermediate to the specified colors.

Ask Tim Hoar about tim.colors! He is a matlab black belt and this is his favorite scale in that system. two.colors is really about three different colors. For other colors try fields.color.picker to view possible choices. start="darkgreen", end="azure4" are the options used to get a nice color scale for rendering aerial photos of ski trails. (See http://www.image.ucar.edu/Data/MJProject.)

designer.color is the master function for two.colors and tim.colors. It can be useful if one wants to customize the color table to match quantiles of a distribution. e.g. if the median of the data is at .3 with respect to the range then set x equal to c(0,.3,1) and specify three colors to provide a transtion that matches the median value.

See Also

topo.colors, terrain.colors, image.plot, quilt.plot, grey.scale

Examples

Run this code
tim.colors(10) 
# returns an array of 10 strings in hex format
#e.g. (red, green,  blue) values of   (16,255, 239)
# translates to "#10FFEF" .

# veiw some color table choices
set.panel( 1,3)
par( pty="s")

image( outer( 1:20,1:20,"+"), col=tim.colors( 200)) # 200 levels

image( outer( 1:20,1:20,"+"), col=two.colors() )
coltab<- designer.colors(col=c("blue", "grey", "green"),  x= c( 0,.3,1) ) 

image( outer(1:20, 1:20, "+"), col= coltab )
set.panel()

Run the code above in your browser using DataLab