如何在ggplot2中指定图形大小而与轴标签无关

说我有一个数据框并想作图

df <- melt(iris)

p <- ggplot(data = df, aes(x = Species, y = value)) + 
       geom_boxplot() + theme(aspect.ratio = 1)

然后，我想使用ggsave（）保存此图的pdf

ggsave(plot = p, width = 3, height = 3, dpi = 300, filename = "not squished axis.pdf")

问题是我想指定图本身的尺寸，但独立于轴标签，以便下面指定的图在轴的绝对长度方面具有相同的大小和尺寸。

q <- ggplot(data = df, aes(x = Species, y = (value)*10000000)) +
       geom_boxplot() + theme(aspect.ratio = 1)

ggsave(plot = q, width = 3, height = 3, dpi = 300, filename = "squished axis.pdf")

有没有一种方法可以轻松做到这一点？

这是一个在轴长方面更接近我想要的图的示例：

唯一的问题是，通过更改长宽比，我最终挤压了y轴，使x轴的长度更接近均匀。