如何提高饼图的可视化质量？答案

【问题标题】：How to improve the visualization quality of a pie chart?如何提高饼图的可视化质量？
【发布时间】：2020-01-30 17:16:48
【问题描述】：

我有一些数据，我想从中做一个饼图。在数据中，有一个类别是低的，它在图表上的标签看起来不太好。我的代码和相应的情节如下。

library("readr")
library("fmsb")
library("car")
library("normtest")
library("nortest")
library("moments")
library("readxl")   
library("ggplot2")
library("stats")
library("data.table")
library("dplyr")
library("plotly")

count.data <- data.frame(
  Tópico = c("Problemas de ruteo", "Diseño de redes ", "Ruteo y localización", "Modelos de inventario","Problemas de localización","Problemas de asignación","Medición de riesgo"),
  n = c(27,6,16,10,31,6,4),
  prop = c(27,6,16,10,31,6,4)
)
count.data

count.data <- count.data %>%
  arrange(desc(Tópico)) %>%
  mutate(lab.ypos = cumsum(prop) - 0.5*prop)
count.data

mycols <- c("#A1E89D", "#EFC000FF", "#868686FF", "#CD534CFF","#7AD55D","#9333FF","#FF33CE")

ggplot(count.data, aes(x = "", y = prop, fill =Tópico)) +
  geom_bar(width = 1.8, stat = "identity", color = "black") +
  coord_polar("y", start = 0)+
  geom_text(aes(y = lab.ypos, label = paste0(prop, "%")), color = "black",cex=3.5)+
  scale_fill_manual(values = mycols)+ theme(axis.text.x=element_blank())+theme_void()

剧情是：

如你所见，黄色的类别不好看，一般情况下，我想改变这些标签的样式，例如，这样：

当然，我想保留传说，有什么想法吗？提前致谢

【问题讨论】：

标签： r ggplot2 plot label pie-chart

【解决方案1】：

使用 Plotly 的简单解决方案。

plot_ly(count.data, labels = ~count.data$n, values = ~count.data$n, type = 'pie',
        textposition = 'outside',
        textinfo = 'label',
        insidetextfont = list(color = '#FFFFFF'),
        hoverinfo = 'text',
        marker = list(line = list(color = '#FFFFFF', width = 1)),showlegend = TRUE)

【讨论】：