控制从ggplot2中的因子变量生成的饼图中的刻度和奇数文本

Question

我正在使用以下代码生成一个简单的饼图：

data(mtcars)
mtcars$fac_var <- as.factor(mtcars$cyl)
require(ggplot2); require(ggthemes)

# Chart
pie_test <- ggplot(mtcars, aes(x = factor(1), fill = fac_var)) +
  geom_bar(width = 1) +
  coord_polar(theta = "y") +
  ggtitle("Title") +
  theme_pander() +
  scale_fill_tableau(name = "Something") +
  theme(axis.title = element_blank())

代码生成以下图表：

我有兴趣对上面的图表进行两处小修改：

1. 我想删除左侧上可见的 1 （下图中以红色突出显示）。
2. 我想让通向数字的线条更强烈地发音（在下图中以黑色突出显示）。

期望的更改：

Answer 1

1。）摆脱＆＃34; 1 - ＆＃34; 编辑您的主题：

theme(axis.title = element_blank(),
      axis.ticks.y = element_blank(),
      axis.text.y = element_blank())

2。）要更改行，请将主题编辑为：

theme(axis.title = element_blank(), 
      axis.ticks.y = element_blank(),
      axis.text.y=element_blank(),
      panel.grid.major.y = element_line(size = 1, color="black", linetype = "solid"))

不是一个完美的解决方案，而是一种改进。饼图不是传输数据的最佳选择。您可能需要考虑条形图。如果您需要更多关于ggplot2饼图的帮助，请查看this post。