R/COLOR3B.R

In SooLee/plotosaurus: Plotosaurus

#' A color function
#'
#' This function returns a set of colors that can be used for co-plotting
#' @keywords plot color
#' @export
#' @return No particular return value
#' @examples
#'
#' barplot(1:3, names.arg=c('a','b','c'),ylab="some y",xlab="some x", col=COLOR3B())
#'

COLOR3B <-function() { c('grey80','grey60',1) }