为什么在将带有 ggtheme 的 ggplot 打印到 word 中时没有右边框？

Question

我正在 R markdown 中创建绘图以打印到 MS word。当我使用基本 R plot() 函数创建绘图时，打印的绘图周围没有边框。如果我使用基本的 ggplot，也一样。但是，如果我使用 ggthemes 添加主题，它会在打印图的顶部、左侧和底部添加边框（但不是右侧）。

我不知道为什么要添加这些边框，或者为什么要省略右侧的边框。无论我使用哪个主题，它似乎都会发生（由于白色背景，我更喜欢 theme_gdocs 或 theme_clean）。与其删除所有这些边框，我更愿意在所有四个边上都包含边框。

这是我的代码：（希望图片有效）

---
title: "ggplot reprex"
author: "Me"
date: "11/5/2019"
output: word_document
---

knitr::opts_chunk$set(echo = TRUE)
library(tidyverse); library(ggthemes)

data=pressure

基本情节：

plot(data)

base plot image

ggplot:

ggplot(data=data,aes(x=temperature,y=pressure))+
  geom_point()

ggplot image

ggplot 与 ggtheme:

ggplot(data=data,aes(x=temperature,y=pressure))+
  geom_point()+
  theme_gdocs()

ggplot with ggtheme image

Answer 1

我能够使用 theme() 中的 plot.background 修改来解决这个问题，如下所示：

ggplot(data=data,aes(x=temperature,y=pressure))+
  geom_point()+
  theme_gdocs()+
  theme(plot.background=element_rect(colour="black",fill=NA,size=1))

感谢所有致力于修复的人！

为什么在将带有 ggtheme 的 ggplot 打印到 word 中时没有右边框？

Why is there no right border when printing a ggplot with a ggtheme into word?

r

ggplot2

r-markdown

ggthemes