R 在ggplot中调整图形大小-保持比例、字体大小等

我对ggplot还不熟悉，但我成功地制作了一个我非常满意的条形图。但是，我需要把它缩小，以便整齐地放在纸上。我不知道如何在不改变比例、字体大小等的情况下调整它的大小。 有什么想法吗

以下是调整大小前的绘图：

然后就是这里，看起来很可怕：

这是我使用的代码。非常感谢

    #creating a data frame

    df <- data.frame("DV"=runif(100), factor1=1:100, factor2=1:100)
    df$factor1[1:50] <- "A"
    df$factor1[51:100] <- "B"
    df$factor2[1:25] <- "X"
    df$factor2[51:75] <- "X"
    df$factor2[26:50] <- "Y"
    df$factor2[76:100] <- "Y"

    plot <- ggplot(df, aes(factor1, DV, fill=factor2)) + 
      stat_summary(fun.y = "mean", geom="bar", position="dodge") +
      stat_summary(fun.data = mean_cl_normal, geom = "errorbar", 
      position = position_dodge(width=0.9), width=0.2) +
      theme_bw()+
      labs(title="Example plot", x="x", y="y", fill="factor2") +
      theme(plot.title = element_text(hjust = 0.5, size=11)) +
      scale_fill_manual(breaks=c("X", "Y"), labels=c("level X", "level Y"), values=c("#D55E00", "#56B4E9")) +
      scale_x_discrete(breaks=c("A", "B"), labels=c("level A", "levelB")) +
      theme(text=element_text(size=11))
      plot

      ggsave("plot1.eps") #saves a 7x7 image

      ggsave("plot2.eps", height=3.5, width=3.5) #keeping with the dimensions and reducing size, looks horrible

#创建数据帧
df你能读入你写在文件中的7x7图形并调整它的大小吗？不幸的是，这并不能完全解决这个问题，因为我再也不能控制字体大小了。如果我也改变纵横比，字体甚至会变形。看起来最简单的解决方案是在创建绘图时定义图像的大小。你能读入写入文件的7x7图形并调整大小吗？不幸的是，这并不能完全解决问题，因为我无法再控制字体大小了。如果我也改变纵横比，字体甚至会变形。看起来最简单的解决方案是在创建绘图时定义图像的大小。