在这里我尝试使用创建热图highcharter::hcharter()
where 小于-1应该是一种颜色(粉红色),-1 to 1应该是透明或白色的,并且大于+1应该是另一种颜色(紫色)。
目前我已经使用编写代码hchart()
并使用color_stops
更改颜色格式。但是,当数据以 0 为中心时,这种方法效果非常好,但当数据不以 0 为中心时,比如说-5 至 +7.5白色/透明颜色将转变为 1,如下图所示。
a1 <- rnorm(30,0,2)
a2 <- rnorm(30,0,2)
a3 <- rnorm(30,0,2)
a4 <- rnorm(30,0,2)
a <- cbind(a1,a2,a3,a4)
heatmap_matrix <- as.matrix(a)
library(highcharter)
hchart(heatmap_matrix) %>%
hc_colorAxis(stops = color_stops(n = 3, colors = c("#FF1493", "white", "#800080")))
对于数据范围之间-5 to +7.5
-5 到 -1 应显示粉红色渐变颜色
-1 到 +1 应显示白色
+1 到 7.5 应显示紫色渐变颜色