R/col.alpha.R

Defines functions col.alpha

#'
#'@importFrom grDevices col2rgb rgb
#'

col.alpha <- function(col, alpha = 1) {
  col.rgb <- col2rgb(col) / 255
  red <- col.rgb[1]
  green <- col.rgb[2]
  blue <- col.rgb[3]
  outp <- rgb(red = red, green = green, blue = blue, alpha = alpha)
  outp
}

Try the smoots package in your browser

Any scripts or data that you put into this service are public.

smoots documentation built on Oct. 10, 2021, 1:09 a.m.