使用 echarts4r 测量颜色

Gauge colors using echarts4r

根据我找到的示例 here 我认为下面的代码会生成具有三个颜色范围的仪表:

0 < x <= 1.5: green
1.5 < x <= 3: yellow
x > 3: red

这是我拥有的:

library(echarts4r)
library(magrittr)

CA_gauge <- e_charts() %>% 
  e_gauge(4.1, 
          "INCIDENCE", 
          min=0, 
          max=20,
          axisLine = list(
            linestyle = list(
              color=list(
                c(1.5, "green"),
                c(3, "yellow"),
                c(20, "red")
              )
            ))) %>% 
  e_title("CA")

print(CA_gauge)

但它产生的是

我怀疑我遗漏了一些基本的东西...

谢谢!

有两点需要调整。 linestyle 需要一个大 S - lineStyle - 并且 breacks 必须是百分比。

此外,您可以添加 splitNumber 来调整中断并使 te gauge 更具可读性。

# breaks in percentage 
1.5 / 20 = 0.075
3 / 20 = 0.15 
20 / 20 = 1
CA_gauge <- e_charts() %>% 
  e_gauge(4.1, 
          "INCIDENCE", 
          min=0, 
          max=20,
          splitNumber = 20,
          axisLine = list(
            lineStyle = list(
              color=list(
                c(0.075, "green"),
                c(.15, "yellow"),
                c(1, "red")
              )
            ))) %>% 
  e_title("CA")

print(CA_gauge)