📅  最后修改于: 2022-03-11 14:56:57.838000             🧑  作者: Mango
代码示例2
lighten <- function(color, factor=1.4){
col <- col2rgb(color)
col <- col*factor
col <- rgb(t(col), maxColorValue=255)
col
}