R 控制ggplot2中的颜色透明度

我想使用值为1到10的列“x”来控制手动指定颜色的透明度。我可以通过添加‘alpha=x’来实现，但在这种情况下，我会在散点图中看到深色点。有人能帮忙吗

这是我的密码：

plot1 <- qplot(data=srna[srna$norm_sum > 0 & srna$len > 18 & srna$len < 25, ], x=position,y=norm_sum,colour= len)
plot1 + geom_point(size=4) +
  theme_bw()+
#   scale_alpha_continuous(range = c(0.1, 0.8))+
  scale_colour_manual(values = c("19" = "pink","20" = "blue","21" = "green", "22" = "yellow","23" = "violet", "24" = "red"))+
  theme(panel.grid.minor.x = element_line(colour='grey94'),panel.grid.minor.y = element_line(colour='grey94'),
        panel.grid.major.x = element_line(colour='lightgrey'),panel.grid.major.y = element_line(colour='lightgrey'))

plot1 0&srna$len>18&srna$len<25，]，x=位置，y=标准长度，颜色=len）
图1+几何点（尺寸=4）+
主题_bw（）+
#标度α连续（范围=c（0.1,0.8））+
比例颜色手册（数值=c（“19”=“粉色”、“20”=“蓝色”、“21”=“绿色”、“22”=“黄色”、“23”=“紫色”、“24”=“红色”））+
主题（panel.grid.minor.x=元素线（color='grey94'），panel.grid.minor.y=元素线（color='grey94'），
panel.grid.major.x=元素线（color='lightgrey'），panel.grid.major.y=元素线（color='lightgrey'））

尝试使用中的默认数据重现您的问题（下面的代码），我得到了这个结果。也许你可以指出这里的问题是什么

#install.packages（“ggplot2”，dependencies=TRUE）
图书馆（GG2）
p您能否添加一个数据外观指示<代码>头部（srna）

将是合适的。你说的“深色点”是什么意思？另外，您能描述一下为什么要手动指定alpha吗？最后，你看过吗？

# install.packages("ggplot2", dependencies = TRUE)
library(ggplot2)
p <- ggplot(mtcars, aes(wt, mpg))
p + geom_point(size=4, alpha = 0.5, aes(colour = factor(cyl))) + 
       theme_bw() + 
   scale_colour_manual(values = c("4" = "pink","6" = "blue", "8" = "green")) +
    theme(panel.grid.minor.x = element_line(colour='grey94'),
           panel.grid.minor.y = element_line(colour='grey94'),
           panel.grid.major.x = element_line(colour='lightgrey'),
           panel.grid.major.y = element_line(colour='lightgrey'))