相关疑难解决方法(0)

我的问题是非常相似,这个和这个,也该问题.我有一个geom_point使用特定调色板的因子着色的散点图(使用).我正在使用stat_smooth通过点绘制某些平滑线,按另一个因子分组.我希望这些线条使用不同的调色板.

这是一些示例数据的Dropbox链接.做一个

currDT <- read.table("SO_data", sep = "|", header = TRUE, strip.white = TRUE)

我通常将数据放在data.table中,因此您可能会发现它也有帮助.哦,这是我目前正在使用的配色方案,你可以用它scale_colour_brewer来生成你自己的配色,我只是为了完整而包含这个.

my_col_scheme <- c("#e41a1c", "#377eb8", "#4daf4a", "#984ea3", "#ff7f00", "#7B8A7B",
    "#0B29D6", "#f781bf", "#999999", "black")

希望这很清楚.这是一些示例代码:

icorr_elec <- ggplot(currDT,
                aes(x = EFP, y = SAPT), na.rm = TRUE) +
    geom_point(aes(colour = Anion, shape = Cation),  size = 3, alpha = 0.4) +
    scale_colour_manual(values = my_col_scheme) +
    stat_smooth(method = "lm", formula …