powered by
ellipseGrob(x, y, size=1, angle=rep(pi/2, length(x)), ar=1, gp=gpar(colour = "grey50", fill = "grey90"), default.units="native", size.units="mm")
g = ellipseGrob(1:10/11,1:10/11,size=5,ar=1:5,angle=rnorm(10), def="npc", gp=gpar(fill=grey(1:10/11))) grid.draw(g)
Run the code above in your browser using DataLab