echarts4r: как сопоставить цвет линии с легендой

Question

Я вручную ввожу цвет линии в echarts4r - как легенда может соответствовать этому цвету линии?

 library(echarts4r)

df <- data.frame(
  x = seq(50),
  y = rnorm(50, 10, 3)
)

df %>% 
  e_charts(x) %>% 
  e_line(y, showSymbol = FALSE, lineStyle = list(color = "green"))

Вывод ниже - легенда показывает красный цвет, строка зеленая.