R code to make transparent bubbles