geom_point
,geom_line
,geom_hline
,和geom_abline
。为了摆脱这些界限,我们需要
geom_abline(aes(color = "yellow", intercept = 0, slope = 1), show.legend = FALSE)
而对于我们必须添加的点
guides(color = guide_legend(override.aes = list(shape = c(19, NA, NA))))
如何删除添加到图例的倾斜线?还有黄色和灰色的点......它为什么会发生?
library(ggplot2) x <- seq(from = 1, to = 10, by = 1) df = data.frame(x=x, y=x^2, v=2*x) df2 = data.frame(x=x, y=x^2-5*x-10) ggplot(df, aes(x, y)) + geom_point(aes(size = v)) + theme_classic() + scale_size("blabla") + geom_point(data=df2, aes(x, y, color = "blue")) + geom_line(data=df2, aes(x, y, color = "blue")) + geom_hline(aes(color="gray",yintercept=25)) + geom_abline(aes(color="yellow", intercept=0, slope=1)) + scale_color_manual(values = c("blue","gray","yellow"), labels = c("nanana","hhh","abab"), name = "other")
三个资料Q群下载不了也转发不了,先放这里Fine_tuning.zipLangChain.zipdata_clear.rar