R 如何删除圆环图边框

我想删除在我的甜甜圈图表上分隔颜色的边框线。这可能吗

df <- data.frame(
group = c("Never", "Only a \n few times", "Weekly", "Daily", "Multiple \n times per day"),
value = c(5,28, 34, 27, 6))

par(mar=c(5, 10, 5, 5) )  # this sets margins to allow long labels
#par(oma=c(0,0,0,0))
# create labels
df$label <- paste(df$group,
              scales::percent(df$value/sum(df$value), accuracy = 1), sep = "\n")

ggpubr::ggdonutchart(df, "value",
                 label = "label", # add labels
                 color = "white",fill = "group",
                 lab.pos = c("out"), #THIS PLACES DATA LABELS ON OUTSIDE OF DONUT
                 lab.adjust = 1,
                 radius = .3,
                 borders ='n',
                 palette = c("dodgerblue3", "darkorange2", "lightsteelblue4", "goldenrod1", 
"dodgerblue4")) +
 [![enter image description here][1]][1]theme(legend.position = "none") #DELETES LEGEND

---

df如果确实要删除这些边框，可以执行
color=NULL

ggpubr::ggdonutchart(df, "value",
                     label = "label", # add labels
                     color = NULL,fill = "group",
                     lab.pos = c("out"), #THIS PLACES DATA LABELS ON OUTSIDE OF DONUT
                     lab.adjust = 1,
                     radius = .3,
                     borders ='n',
                     palette = c("dodgerblue3", "darkorange2", "lightsteelblue4", "goldenrod1", 
                                 "dodgerblue4"))


下面是另一个你可能会发现很有用的技巧，如果你不想删除边框，只想让它们看起来像填充颜色并保留一个漂亮的图例，你可以做
color=“group”
和
fill=“group”


ggpubr::ggdonutchart(df, "value",
                     label = "label", # add labels
                     color = "group",fill = "group",
                     lab.pos = c("out"), #THIS PLACES DATA LABELS ON OUTSIDE OF DONUT
                     lab.adjust = 1,
                     radius = .3,
                     borders ='n',
                     palette = c("dodgerblue3", "darkorange2", "lightsteelblue4", "goldenrod1", 
                                 "dodgerblue4"))