powered by
opaque(color = SushiColors(7)(7), transparency = 0.5)
plot((1:10),col="red",pch=19) points((10:1),col=opaque("red",transparency=0.3),pch=19)
Run the code above in your browser using DataLab