R reverse color map

# reverse color ramp
colors <- function(n, alpha = 1) {
    rev(heat.colors(n, alpha))
}
plot(NBA.SOM1, type = "counts", palette.name = colors, heatkey = TRUE)
原文地址:https://www.cnblogs.com/yaos/p/14014178.html