从ggplot2黑暗主题导出，没有白色边框？

Question

我希望我的情节具有深色背景以匹配我正在使用的幻灯片主题。我拥有我想要的一切，但我无法弄清楚如何从整体图像中删除白色边框。我正在寻找theme(plot.border = element_line(color = "#1e1e1e"))之类的东西，但似乎没有plot.border属性。

无论我对我的出口尺寸做什么，它总是包含它。我从来都不知道过去曾经有过边界，因为我总是在白色上使用白色，但现在却被曝光了！

我尝试了很多东西，无法摆脱那条愚蠢的行，我真的不想裁剪我的图片去除，或者从RStudio手动截图：）

这是代码，下面是它正在创建的图像......

p<- ggplot(barchart.data, aes(x=x_labs, y=ests, fill=l_labs)) + 
  geom_bar(stat="identity", color=fill_colors, position=position_dodge(), fill=fill_colors) +
  geom_text(aes(y=ests+perrs+0.02, label=sprintf("%1.1f%%", 100*ests)), vjust=0.5, hjust=0, size=bar.font, color="white") +
  geom_errorbar(aes(ymin=ests-nerrs, ymax=ests+perrs), width=.2, position=position_dodge(.9), color="white", size=0.25) + 
  labs(title=chtit, x=xaxis, y = yaxis) + 
  theme_classic() + 
  scale_y_continuous(limits = c(0,1.1), breaks=c(0, 0.2, 0.4, 0.6, 0.8, 1)) + 
  theme(legend.position="none", legend.text = element_text(color = "white")) +
  theme(title = element_text(colour = "white")) +
  theme(axis.text = element_text(size=12, color = "white"), axis.line = element_line(color = "white")) +
  theme(axis.title = element_text(size=12, color = "white")) +
  coord_flip() +
  theme(panel.grid.major.x = element_line(colour = "white",size=0.25))+
  theme(aspect.ratio = 1) +
  theme(panel.background = element_rect(fill = "#1e1e1e")) +
  theme(plot.background = element_rect(fill = "#1e1e1e")) +
  guides(fill = guide_legend(reverse = TRUE))
  return(p)