当有多个标签时，为geom_jitter设置特定颜色

Question

在绘制一些箱线图时，我在尝试设置抖动点的颜色时遇到了一些麻烦。

我的想法是，我想比较两个箱图中的异常值，看看它们是否彼此相关。为此，我还创建了一个包含比较所需的所有值的数据帧比较。我创建了一个新的标签列，可以帮助我识别其中一个箱图的感兴趣的异常值。低于1.5的所有值都是CD3异常值，低于CD3正常值。

comparative[,"label"] <- NA
comparative[comparative$AllDataMedian > 1.5, "label"] <- "CD3Outliers"

comparative[comparative$AllDataMedian <= 1.5, "label"] <- "CD3Normal"

Mcomparative <- melt(comparative)

c <- ggplot(Mcomparative, aes(variable, value))

c + geom_boxplot(outlier.shape = NA) + geom_jitter(shape=16, position=position_jitter(0.1), aes(colour=label))

用这个我得到

我很高兴它，但我想改变那些默认颜色。我希望有人可以帮助我。

感谢。