可以将宽度设置为0.75并增加纵横比：

library(ggpubr)

ggboxplot(
  df_outcome.scaled, 
  x = "Schedule", 
  y = "Cort",
  notch = TRUE,
  width = 0.5
) + theme(aspect.ratio = 1.5)

所用数据

set.seed(3)

df_outcome.scaled <- data.frame(Schedule = rep(c('Acute', 'Chronic'), 20),
                                Cort = rnorm(40, rep(c(5, 7.5), 20), 2))

Allan的答案已经很好了，但这里有另一种快速而又笨拙的方法，可以使用R中的iris数据，使用scale_x_discrete来更改宽度。只需将数值限制设置为希望x轴和y轴扩展的位置（正值会使绘图更宽/更长，而负值则相反）。

#### Load Libraries ####
library(tidyverse)
library(ggpubr)

#### Use Scale X ####
ggboxplot(iris,
          x="Species",
          y="Petal.Width")+
  scale_x_discrete(expand = c(-1,-1))

另一种方法是，如果要将图导出到其他位置，则在图窗口中手动更改其宽度和高度。