R combine rColorRamp＆Transparency

Question

我是R的新手，我已经写了下面的内容来创建一个绘图点，其中的点根据第三个变量着色，颜色坡度为红色/黄色/绿色。它工作正常，但我有几个重叠的点，所以最终的情节并不像我想的那样清晰。有没有办法使用半透明颜色的colorramp？

col<- colorRampPalette(c("#d62728", "#fbee29","#2ca02c")) 
sto.col <- col(100) 

plot(agg.ASP$OTB.Qty,agg.ASP$ASP, type="n") 
for (i in 1:length(agg.ASP$STO)) { 
    col.index <- agg.ASP$STO[i] * 100 
    points(agg.ASP$OTB.Qty[i], agg.ASP$ASP[i], col=sto.col[col.index], pch=16) 
} 

Answer 1

您的colorRampPalette()功能（col）返回十六进制颜色代码;你可以附加2个额外的字符表示不透明的结果;举例来说，我只是改变1号线在你的代码（你想要的透明程度代替 '33' 在这里）：

col<- colorRampPalette(c("#d62728", "#fbee29","#2ca02c")) 
sto.col = paste0(col(100), "33") 

plot(agg.ASP$OTB.Qty,agg.ASP$ASP, type="n") 
for (i in 1:length(agg.ASP$STO)) { 
    col.index <- agg.ASP$STO[i] * 100 
    points(agg.ASP$OTB.Qty[i], agg.ASP$ASP[i], col=sto.col[col.index], pch=16) 
} 

Answer 2

colorRampPalette(c("#d6272833", "#fbee2933","#2ca02c33"), alpha=TRUE)