我正在R降价中创建要打印到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

具有ggtheme的ggplot：

ggplot(data=data,y=pressure))+
  geom_point()+
  theme_gdocs()

ggplot with ggtheme image