Javascript R基于值的打印点颜色

我对highcharts和highcharter不熟悉。 我有一个这样的数据帧

tmp <- data.frame(x = 1:5, y = rnorm(5), color = c("green", "red", "green", "orange", "red"))
# x       y  color
# 1  0.4421  green
# 2 -0.8924    red
# 3  0.8264  green
# 4  0.6695 orange
# 5 -0.0966    red

---

tmp如果以十六进制格式提供颜色变量，highcharter将识别颜色

tmp <- data.frame(x = 1:5, y = rnorm(5), color = c("#00FF00", "#FF0000", "#00FF00", "#ffa500", "#FF0000"))

hchart(tmp, "line", hcaes(x, y, color = color))

tmp略微改进的解决方案：

set.seed(1)
tmp <- data.frame(x = 1:5, y = rnorm(5), 
          color = c("green", "red", "green", "orange", "red"))
dummy <- "two"

library(highcharter)
hchart(tmp, type="scatter", hcaes(x=x, y=y, color=color), 
       marker=list(symbol='circle', radius=5), zIndex=1) %>% 
  hc_add_series(tmp, type="line", color="lightblue", zIndex=0)

set.seed（1）
tmp