使用 ggsave() 保存时，线条覆盖在 ggplot2 bar plot 上

Question

当我在 R Studio 中查看这个栏 plot 时，它显示为我想要的（这是来自屏幕截图）：

但是，当我使用ggsave("filename.png") function 时，它显示为覆盖有浅色线条（可能需要仔细观察才能看到）：

我在 OS X 10.11.3 上使用R版本ggplot2版本 2.00 和 R Studio 版本 0.99.486。

为什么会这样？

Answer 1

你应该看看Cairo图书馆。 我用它来演示和报告中的清晰图形。

Cairo初始化了一个使用cairo图形库进行渲染的新图形设备。 当前的实现产生高质量的PNG，JPEG，TIFF位图文件，具有嵌入字体的高分辨率PDF文件，SVG图形和PostScript文件。 它还提供X11和Windows交互式图形设备。 与其他设备不同，它支持所有图形功能，包括alpha混合，抗锯齿等。

我无法重现你的例子，但这里有类似的例子。

library("ggplot2")
pl <- ggplot(aggregate(mpg ~ cyl, mtcars, FUN=mean), 
             aes(x = cyl, y = mpg)) + 
       geom_bar(stat="identity", fill="red3") +
       theme_bw()

library("Cairo")
CairoPNG("CairoCarPlot.png")
pl
dev.off()

上传PNG，它看起来像：

Answer 2

把它扔出去以防它对其他人有帮助。 当堆叠条形图由多个值组成时，我遇到了同样的问题，我通过分组然后汇总来修复它。 我认为对于您的数据，它将是：df <- dataframe %>% group_by(Weekday) %>% summarize(percent=sum( percentage of tweets ))