emptyplot(c(-0.1, 1.1), main = "roundrect")
for (i in 1:10)
roundrect(mid = runif(2), col = i, radx = 0.1, rady = 0.05)
for (i in 1:5)
roundrect(mid = runif(2), col = greycol(20), radx = 0.05,
rady = 0.05, angle = runif(1)*360)
Run the code above in your browser using DataLab