使用 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 ))