如何将每个图指向正确的y轴(多个图，两个y轴，在R中使用ggplot2)

library(ggplot2)
library(gridExtra)

# 导入数据集
data <- read.csv("your_data.csv")

plot1 <- ggplot(data, aes(x = x_variable, y = y1_variable)) +
  geom_line(color = "blue") +
  labs(x = "X轴标签", y = "Y1轴标签") +
  theme_bw()

plot2 <- ggplot(data, aes(x = x_variable, y = y2_variable)) +
  geom_line(color = "red") +
  labs(y = "Y2轴标签") +
  theme_bw()

combined_plot <- grid.arrange(plot1, plot2, ncol = 1, heights = c(3, 1))