如何使用R创建将3个图合并到一个图中的函数

library(gridExtra)

merge_plots <- function(plot1, plot2, plot3) {
  grid.arrange(plot1, plot2, plot3, nrow = 1)
}

# 创建三个示例图形
plot1 <- plot(1:10, 1:10, type = "l", main = "Plot 1")
plot2 <- plot(1:10, (1:10)^2, type = "l", main = "Plot 2")
plot3 <- plot(1:10, (1:10)^3, type = "l", main = "Plot 3")

# 调用合并函数
merged_plot <- merge_plots(plot1, plot2, plot3)

# 显示合并后的图形
print(merged_plot)