ggplot：另存为.jpeg后，图例被截断

Question

我尝试使用ggplot中的数据创建堆叠的条形图。 Java GD活动窗口中的结果看起来不错，但是将其另存为jpeg（或pdf或tiff）之后，图例将被截断。 我设法将图例放在左上角，但是保存后，图例的框将被截断。 有什么想法吗？谢谢！

run under r console/ jaguar/ R version 3.5.0 (2018-04-23) -- "Joy in Playing" Platform: i386-w64-mingw32/i386（32位）

ggplot(data=ilc_fusion, aes(x=ASMA_dich_deu, fill=CD34_deu)) +
geom_bar() + 
labs(x="ASMA+ Myofibroblasten", y="Anzahl") + 
labs(fill= "Anteil CD34+ Fibrozyten") + 
scale_fill_brewer()

替代代码：

ggplot(data=ilc_fusion, aes(x=ASMA_dich_deu, fill=CD34_deu)) +
geom_bar() + 
labs(x="ASMA+ Myofibroblasten", y="Anzahl") + 
labs (fill= "Anteil CD34+ Fibrozyten") + 
scale_fill_brewer() + 
theme (legend.justification=c(0,1), legend.position=c(0,1))

这是Java窗口中的样子：

这是保存为jpeg后的样子：

和

感谢您的帮助！