RosettaCodeData/Task/Bitmap-Midpoint-circle-algo.../Mathematica/bitmap-midpoint-circle-algo...

3 lines
75 B
Plaintext

img = ExampleData[{"TestImage", "Lena"}];
drawcircle[img, {250, 250}, 100]