我稍微修改了ggpubr包中的甜甜圈图示例,当我添加标签时,它将标签移动到错误的组。在下面的例子中,'A‘是最小的组,但是它得到了标签'D’。我记得,这种情况也发生在ggplot中。我也会增加一个例子。有人知道怎么解决这个问题吗?

library(ggpubr)
df <- data.frame(group = c("A", "B", "C","D"),
value = c(1, 21, 26, 52))
ggdonutchart(df, "value", label = "group")
ggdonutchart(df, "value", label = "group",
fill = "group", color = "white")
# Show group names and value as labels
labs <- paste0(df$group, " (", df$value, "%)")
ggdonutchart(df, "value", label = labs,
fill = "group", color = "white")发布于 2022-08-18 20:05:50
传递带有引号的labs "labs"
library(ggpubr)
library(dplyr)
df %>%
mutate(labs = paste0(group, " (", value, "%)")) %>%
ggdonutchart(., "value", label = "labs",
fill = "group", color = "white")

https://stackoverflow.com/questions/73408750
复制相似问题