Question

我想使用出色的新库shiny在echarts4r应用中构建和部署一些图表。我花了几个小时在echarts4r，github和stackoverflow上，但运气不佳。有效地，使用下面的示例数据，我想执行以下操作：

在两个图表中都用labels字符向量替换值。工具提示触发器显示了它，但我需要用相应的标签替换数字。 加分点对于chart 1，如果您可以在每个切片的顶部加上标签（即1对应于A，24对应于X）
将e_title移动到中心对齐。我同时尝试了align=center和显示的语法。
传入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)

R echarts4r-如何向e_pie和e_radar添加自定义标签，中心图表标题以及自定义颜色的输入

0 个答案: