如何向圆环图添加额外的数据标签答案

【问题标题】：How to add additional data label to donut chart如何向圆环图添加额外的数据标签
【发布时间】：2020-11-25 22:24:36
【问题描述】：

我需要帮助为我在下面创建的圆环图添加百分比数据标签。

library(ggpubr)

df <- data.frame(
  group = c("Male", "Female"),
  value = c(38,62))

head(df)
ggdonutchart(df, "value", label = "group")

ggdonutchart(df, "value", label = "group",
             color = "white",fill = "group",
             palette = c("hotpink", "lightblue2") )```

【问题讨论】：

this reference 有帮助吗？

标签： r ggpubr

【解决方案1】：

ggdonutchart 生成的对象是一个 ggplot 对象，因此您可以添加一个带有计算百分比的geom_text。

library(ggpubr)

ggdonutchart(df, "value", label = "group",
             color = "white",fill = "group",
             palette = c("hotpink", "lightblue2") ) +
  geom_text(aes(label = scales::percent(value/sum(value))),
            position = position_stack(vjust = 0.5))

【讨论】：

谢谢。最后一个问题。有没有办法去掉图例中的词组？
@freeazabird 当然。将+ labs(fill = "") 添加到绘图中
我已经用这段代码把情节几乎完全放在了我想要的地方。我怎样才能摆脱原始数字，所以我只有百分比标签？'library(ggpubr) df
@freeazabird 你只有百分比标签。你有什么原始数字？请记住，38 和 62 相加为 100，因此百分比与原始数字相同。 Tru 将 value 更改为 c(23, 54)，你就会明白我的意思了。
这是我得到的图表。但是，我希望它只标有 % ibb.co/wg4kFnD