diff --git a/R/changeColors.R b/R/changeColors.R index 08bdfcf..612466f 100644 --- a/R/changeColors.R +++ b/R/changeColors.R @@ -71,8 +71,7 @@ changeColors <- function(map, className, colors) { ) if (length(colors) > 201) { - inds <- round(seq(0, length(colors), length.out = 201)) - colors <- colors[inds] + colors <- grDevices::colorRampPalette(colors)(201) } cols <- paste0(col2hex(colors), collapse = ", ")