控制蜱和在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. 我想删除左侧可见的 （在下图中以红色突出显示）。
2. 我想使通向数字的线条更加强烈地发音（在下图中以黑色突出显示）。

所需的更改：

Answer 1

1）为了摆脱 “1” 编辑你的主题来：

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。