如何在使用geom_density_ridges()时增加面板顶部的空白

library(ggplot2)

ggplot(data = your_data, mapping = aes(x = your_variable))

geom_density_ridges(scale = 2, rel_min_height = 0.01, quantile_lines = TRUE, quantiles = c(0.25, 0.5, 0.75), alpha = 0.5) +
  theme_ridges() +
  theme(panel.spacing = unit(0.5, "lines"))

library(ggplot2)

# 创建一个示例数据集
your_data <- data.frame(variable = rnorm(100))

# 创建ggplot对象，并设置数据和变量映射
ggplot(data = your_data, mapping = aes(x = variable)) +
  # 添加geom_density_ridges()图层，并设置参数
  geom_density_ridges(scale = 2, rel_min_height = 0.01, quantile_lines = TRUE, quantiles = c(0.25, 0.5, 0.75), alpha = 0.5) +
  theme_ridges() +
  # 设置面板间距
  theme(panel.spacing = unit(0.5, "lines"))