R/color-sfclumsat.R
    pth_color_sfclumsat.RdGet color using surface, luminance, and saturation
pth_color_sfclumsat(surface, lum, sat = 1)object with S3 class pth_surface.
double luminance of the color, 0 <= lum <= 100.
double saturation of the color, 0 <= sat <= 1.
Object with S3 class pth_mat, describing a color.
  sfc_blue <- pth_new_surface("#0000FF")
  color <- pth_color_sfclumsat(sfc_blue, lum = 50, sat = 1)
  pth_to_hex(color)
#> [1] "#6161ff"
#> attr(,"class")
#> [1] "pth_hex"