带highcharter的条形图中的R渐变颜色图例

对于R中的库highcharter，我希望重用热图的默认图例（具有某些值的渐变色），但使用条形图。 怎么可能呢

非常感谢

问候

---

萨姆：是的，在这儿。第一个数字是我想要的，第二个数字是我所做的。两个轴是反向的，但这并不重要。现在，我想画两个传说：

一个具有与圆圈颜色相对应的渐变颜色（在我的dataframe示例中为“颜色”槽）

一个具有不同大小的if圆（值位于数据帧示例的插槽“Count”中）

我在示例中使用的数据帧如下所示：

SO <- data.frame(Description=c("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K"), 
             Ratio = c(0.22, 0.14, 0.14, 0.14, 0.14, 0.10, 0.10, 0.08, 0.06, 0.06, 0.06), 
             Color = c(31, 20, 20, 13, 13, 12,  7, 13,  7,  6,  5), 
             Count = c(11,  7,  7,  7,  7,  5,  5,  4,  3,  3,  3))

nRes <- nrow(SO)
SO <- SO[order(SO$Ratio, decreasing=TRUE),]
SO <- SO[seq(1:nRes),]

colfunc <- colorRampPalette(c("red","royalblue"))
nbColors <- 5

pal <- colfunc(nbColors)
t <- SO$Color
d <- (max(t) - min(t))/nbColors
base <- seq(from=min(t), to=max(t), by = d)
tmpList <- lapply(t, function(x){
if (x == min(t)){ ind <- 1}
else {ind <- which(x > base)[length(which(x > base))]}
})

myColorsIndex <- unlist(tmpList)

df <- data.frame(x=c(0:(nRes-1)),
               y=SO$Ratio,
               z=SO$Count,
               color=pal[myColorsIndex],
               colorSegment=pal[myColorsIndex],
               Color = SO$Color,
               name = SO$Description)


highchart() %>%
hc_chart(type = "bubble") %>%
hc_add_series(df) %>%
hc_legend(enabled = FALSE) %>%
hc_xAxis(type = "category", categories = df$name)  %>%
hc_yAxis(title = list(text = "Ratio"))  

---

那么您能提供一个可复制的示例吗？默认情况下，Highcharts不支持气泡系列的颜色轴（仅热图和贴图）。根本不支持圆圈（计数图例）。因此，您应该手动创建这两个图例。