小编Aks*_*ksR的帖子

我有~14,000个XY对可以绘制,并ggplot2用于此.

由于积分很多,我不得不使用非常低的alpha=0.025.我想以不同的颜色突出显示7个XY点,并且更不透明,并且有一个附带的文本图例.

目前,我的7个特殊数据点的颜色没有显示,因为它们也在alpha=0.025.如何增加这些点的不透明度？

到目前为止我的语法是:

trial <- ggplot(df, aes(x = df$SeqIdentityMean, 
                        y = df$SeqIdentityStdDev,
                        color = factor(df$PfamA_ID))) + 
            geom_point(alpha=0.025) + 
            labs(title="Mean Vs. standard deviation of PfamA seed lengths", 
                 x="Average Length (aa)",
                 y="Standard  Deviation of Length (aa)") + 
            theme(legend.title=element_blank(),
                  legend.key=element_rect(fill='NA'))