drawCircle <- function(x, y, radius){
	ellipse(x, y, radius, radius)
	if(radius > 2){
		radius = radius * 0.75
		drawCircle(x, y, radius)
	}
}

drawCircle(50, 50, 50)