使用点图将图例添加到ggplot2线

library(ggplot2)
# 创建一个基础的ggplot2线图
p <- ggplot(data = your_data, aes(x = x_variable, y = y_variable))

# 添加线条
p <- p + geom_line()

# 添加点图
p <- p + geom_point(aes(color = legend_variable))

# 自定义图例颜色和标签
p <- p + scale_color_manual(values = c("color1", "color2", ...), labels = c("label1", "label2", ...))

library(ggplot2)
# 创建一个基础的ggplot2线图
p <- ggplot(data = your_data, aes(x = x_variable, y = y_variable))
# 添加线条
p <- p + geom_line()
# 添加点图
p <- p + geom_point(aes(color = legend_variable))
# 自定义图例颜色和标签
p <- p + scale_color_manual(values = c("color1", "color2", ...), labels = c("label1", "label2", ...))
# 显示图表
print(p)