如何使用ggplot在同一张图上绘制两组不同配色方案的数据？

install.packages("ggplot2")

library(ggplot2)

data1 <- data.frame(x = c(1, 2, 3, 4, 5), y = c(2, 4, 6, 8, 10))
data2 <- data.frame(x = c(1, 2, 3, 4, 5), y = c(1, 3, 5, 7, 9))

plot <- ggplot(data1, aes(x = x, y = y))

plot <- plot + geom_point(color = "blue")

plot <- plot + geom_line(color = "blue")

plot <- plot + geom_point(data = data2, color = "red")

plot <- plot + geom_line(data = data2, color = "red")

plot <- plot + labs(title = "Two Color Schemes", x = "X", y = "Y")

print(plot)