R：使用ApexCharge更改标签在饼图中的位置

发布于01月30日

我正在使用ApexCharter库来制作饼图，我想将显示的标签更靠近中心，因为它们看起来太"偏离"了.

我try 在ax_dataLabels和Pie_opts中使用负值调整Offset和extAnchor参数，但这并没有改变任何东西.我是否使用了错误的参数或将其放在了错误的位置？

这是我的最新try :

library(dplyr)
library(apexcharter)

dummy_data <- tibble(Fruit = c("Orange", "Apple", "Tomato", "Blueberry"),
                     n = c(6, 4, 3, 5))

dummy_plot <- apex(dummy_data, type = "pie", mapping = aes(x = Fruit, y = n)) %>%
  ax_dataLabels(textAnxhor = "start", offsetX = -50, enabled = TRUE, style = list(fontSize = "16px")) %>%
  ax_title(text = "Dummy Render", align = "top", style = list(fontSize = "18px")) %>%
  ax_legend(position = "bottom") %>% 
  ax_colors(c('#EE9B00', '#116702', '#AE2012', '#0034FF')) %>%
  ax_plotOptions(pie_opts(dataLabels = list(offset = -50)))

dummy_plot

推荐答案

您需要对现有代码进行一个小的更新. 在ax_plotOptions(PIE=PIE_opts(dataLabels=List(Offset=-50)中，显式调用PIE=PIE_opts，因为ax_plotOptions()中没有PIE_OPTS参数

dummy_data <- tibble(Fruit = c("Orange", "Apple", "Tomato", "Blueberry"),
                     n = c(6, 4, 3, 5))

apex(dummy_data, type = "pie", mapping = aes(x = Fruit, y = n)) %>%
  ax_dataLabels(style = list(fontSize = "16px")) %>%
  ax_title(text = "Dummy Render", align = "top", style = list(fontSize = "18px")) %>%
  ax_legend(position = "bottom") %>% 
  ax_colors(c('#EE9B00', '#116702', '#AE2012', '#0034FF')) %>% 
  ax_plotOptions(pie = pie_opts(dataLabels = list(offset = -50)))