Equally Spaced Points on a Circle

Sean E. O'Connor

artificer!AT!seanerikoconnor!DOT!freeservers!DOT!com

Abstract

Draw equally spaced points on a circle.

For[ i = 0; x={},
       i < 15 ,
       ++i,
p = (E^(2 i π I/15));
 x=Append[ x, {Re[p],Im[p]}]]

ListPlot[x,AspectRatio->1,PlotStyle->PointSize[0.02],ImageSize->{500,500}]