Sophie

Sophie

distrib > Mageia > 4 > x86_64 > by-pkgid > 94e73a83b06e7e5b46b34a326b67d402 > files > 322

asymptote-2.24-2.mga4.x86_64.rpm

import graph;

size(100);

int n=30;
real minRadius=0.2;
real angles[]=uniform(0,2pi,n);
angles.delete(angles.length-1);

real[] r=new real[n];
for(int i=0; i < n; ++i)
  r[i]=unitrand()*(1-minRadius)+minRadius;

interpolate join=operator ..(operator tension(10,true));
draw(join(polargraph(r,angles,join),cycle),dot(red));