R echarts4r - Как добавить пользовательские метки, заголовок центральной диаграммы и канал в пользовательских цветах в e_p ie и e_radar

Question

Я хочу построить и развернуть в своем приложении shiny несколько графиков, используя отличную новую библиотеку echarts4r. Я потратил несколько часов на echarts4r , github и stackoverflow без удачи. Фактически, используя приведенные ниже примеры данных, я хотел бы сделать следующее:

1. Заменить значения символьным вектором labels в обеих диаграммах. Триггер всплывающей подсказки показывает это, но мне нужно заменить цифры соответствующими метками. Бонусные баллы Для chart 1, если вы можете наложить метку поверх каждого среза (т. Е. Так, чтобы 1 соответствовал A, а 24 - X)
2. Переместить e_title к центру выравнивания. Я пробовал и align=center, и синтаксис, который я показываю.
3. Передача вектора из HEX цветов для сопоставления с каждой из категорий variable.

Любая помощь будет искренне признателен.

df <- data.frame(
grps = c("ZZZ1", "ZZZ1", "ZZZ1", "ZZZ1", "ZZZ1", "ZZZ1",
"ZZZ2", "ZZZ2", "ZZZ2", "ZZZ2", "ZZZ2", "ZZZ2",
"ZZZ3", "ZZZ3", "ZZZ3", "ZZZ3", "ZZZ3", "ZZZ3",
"ZZZ4", "ZZZ4", "ZZZ4", "ZZZ4", "ZZZ4", "ZZZ4"

),
variables = c("v1", "v2", "v3", "v4", "v5", "v6",
"v1", "v2", "v3", "v4", "v5", "v6",
"v1", "v2", "v3", "v4", "v5", "v6",
"v1", "v2", "v3", "v4", "v5", "v6"
),
values = sample.int(20, 24, replace = TRUE)
)
df$labels <- LETTERS[df$values]

df %>% 
group_by(grps) %>% 
e_charts(variables, timeline = TRUE) %>% 
e_pie(values, roseType = "area") %>%
e_labels(fontSize = 12) %>%
e_title("Please center me", title.left = 'center') %>%
e_tooltip(trigger = "item", show = TRUE)

df %>% 
     group_by(grps) %>% 
     e_charts(labels, timeline = FALSE) %>% 
     e_radar(values, max = 24, name = "Need to show the corresponding labels instead of the numbers.") %>% 
     e_tooltip(trigger = "item") %>%
     e_labels(fontSize = 10)