使用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-布雷必须是百分比。

此外，您可以添加splitNumber来调整间隔并提高仪表的可读性。

# 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)