powered by
transparent(col, percent = 50)
col2rgb
pct <- seq(0, 100, by = 10) plot(pct, pct, bg = transparent("red", pct), pch = 21, cex = 4, xlab = "X", ylab = "Y")
Run the code above in your browser using DataLab