📅  最后修改于: 2022-03-11 14:52:01.552000             🧑  作者: Mango
代码示例1
darken <- function(color, factor=1.4){
col <- col2rgb(color)
col <- col/factor
col <- rgb(t(col), maxColorValue=255)
col
}