如何修改echarts4r中e_text_g()添加的图表注释文本颜色

需要修改echarts4r绘制图表时，通过e_text_g()函数添加的自定义文本颜色，此前尝试在style配置项、e_text_style()中设置color为红色均未达到预期效果，测试代码如下：

library(echarts4r)
library(tidyverse)
data(cars)

cars %>% count(speed) %>% 
  e_chart(speed) %>% 
  e_bar(n) %>% 
 e_text_g(style = list(text = c("Text i want like to change to red"), # 需要将该文本修改为红色
            fontSize = 20, opacity = .7, color = "red"), left = 75, top = 1) %>% 
            e_text_style(
            color = c("red")
          )

• e_text_g() 是对ECharts底层graphic自定义图形接口的封装，这类自定义文本的显示颜色对应的配置项是fill（图形填充色），直接在style里写color字段不会被组件识别。
• e_text_style() 是全局配置图表内置文本（坐标轴标签、图例、标题等）样式的方法，无法作用于通过graphic接口手动添加的自定义文本元素，所以额外加这段代码不会生效。

只需要在e_text_g()的style列表中，将原本的color = "red"替换为fill = "red"即可，不需要额外调用e_text_style()，修正后的可运行代码如下：

library(echarts4r)
library(tidyverse)
data(cars)

cars %>% count(speed) %>% 
  e_chart(speed) %>% 
  e_bar(n) %>% 
  e_text_g(
    style = list(
      text = "Text i want like to change to red",
      fontSize = 20, 
      opacity = .7, 
      fill = "red" # 控制自定义文本的显示颜色
    ), 
    left = 75, 
    top = 1
  )

运行后添加的自定义文本即可正常显示为红色。

内容的提问来源于stack exchange，提问作者Ian.T