Convert colors to grey/grayscale

Share:

Description

Convert colors to grey/grayscale so that you can see how your plot will look after photocopying or printing to a non-color printer.

Usage

1
2
col2grey(cols)
col2gray(cols)

Arguments

cols

Colors to convert.

Details

converts colors to greyscale using the formula grey=0.3*red + 0.59*green + 0.11*blue. This allows you to see how your color plot will approximately look when printed on a non-color printer or photocopied.

Value

A vector of colors (greys) corresponding to the input colors.

Author(s)

Greg Snow 538280@gmail.com

See Also

grey, col2rgb, dichromat package

Examples

1
2
3
4
5
6
7
8
9
par(mfcol=c(2,2))
tmp <- 1:3
names(tmp) <- c('red','green','blue')

barplot( tmp, col=c('red','green','blue') )
barplot( tmp, col=col2gray( c('red','green','blue') ) )

barplot( tmp, col=c('red','#008100','#3636ff') )
barplot( tmp, col=col2grey( c('red','#008100','#3636ff') ) )

Want to suggest features or report bugs for rdrr.io? Use the GitHub issue tracker.