# 创建数据框 df <- data.frame(x = 1:10, y1 = rnorm(10), y2 = rnorm(10)) # 绘制点图 ggplot(df, aes(x = x, y = y1)) + geom_point(aes(size = y1), color = "blue", show.legend = TRUE) + geom_point(aes(size = y2), shape = 3, color = "red", show.legend = TRUE) 绘制出来的图例重叠在一起,我想让图例分开,如何做啊