R - ggplot在同一张图中绘制不同列的多条回归线

要在同一张图中绘制不同列的多条回归线，可以使用ggplot2包中的geom_smooth函数。以下是一个代码示例：

# 加载必要的库
library(ggplot2)

# 创建示例数据集
data <- data.frame(x = rep(1:10, 2),
                   y = c(2, 3, 5, 4, 6, 8, 7, 9, 10, 12, 1, 4, 3, 6, 5, 8, 10, 12, 14, 16))

# 创建绘图对象
p <- ggplot(data, aes(x = x, y = y, color = factor(x %% 2)))

# 绘制散点图和回归线
p + geom_point() + geom_smooth(method = lm, se = FALSE)

在上述示例中，首先加载了ggplot2库。然后，创建了一个包含x和y变量的示例数据集。接下来，使用ggplot函数创建了一个绘图对象，并使用aes函数将x和y变量与颜色变量相关联。最后，使用geom_point函数绘制散点图，并使用geom_smooth函数绘制回归线。在geom_smooth函数中，设置method参数为lm表示使用线性回归方法，设置se参数为FALSE表示不显示回归线上的置信区间。