如何调整不同列数条形图宽度以在Word中一致展示？解决ggsave无效问题

我要把多幅条形图放进Word文档展示，其中一部分是4列的条形图，剩下的是8列的。希望把4/5列的图宽度设为8列图的一半，保证所有图在Word里高度大致相同，宽度随列数调整。我照着相关教程修改了ggsave()的宽高参数，但保存后的图放进Word里完全没变化。

相关R代码 #

ggsave(ggsave(file = "plot_9.jpeg",
              plot = plot_9,
              width = 8, height = 9, units = "cm",
              dpi = 300))
ggsave(ggsave(file = "plot_9.jpeg",
              plot = plot_9,
              width = 5, height = 9, units = "cm",
              dpi = 300))

效果图 #

内容的提问来源于stack exchange，提问作者Laura Aina