如何在ggplot2上调整辅助Y轴的间距或边距？

library(ggplot2)

# 创建一个示例数据集
data <- data.frame(x = 1:10, y1 = 1:10, y2 = 11:20)

# 创建一个基本的ggplot对象
p <- ggplot(data, aes(x = x)) +
  geom_line(aes(y = y1, color = "y1")) +
  geom_line(aes(y = y2, color = "y2")) +
  scale_color_manual(values = c("y1" = "red", "y2" = "blue"))

# 修改主题，调整辅助Y轴的间距
p + theme(panel.spacing.y = unit(0.5, "cm"))

library(ggplot2)

# 创建一个示例数据集
data <- data.frame(x = 1:10, y1 = 1:10, y2 = 11:20)

# 创建一个基本的ggplot对象
p <- ggplot(data, aes(x = x)) +
  geom_line(aes(y = y1, color = "y1")) +
  geom_line(aes(y = y2, color = "y2")) +
  scale_color_manual(values = c("y1" = "red", "y2" = "blue"))

# 使用scale_y_continuous函数调整辅助Y轴的间距
p + scale_y_continuous(expand = c(0.1, 0.5))