Average distance to neighbor points

vex_avg_nbor_dist.cpp

///
/// Average max distance
///
float maxdistance = 15;
int maxpoints = 5;
int closept[] = pcfind_radius(0, "P", "pscale", 1.0, @P, maxdistance, maxpoints);

f@dist = 0;
foreach (int opt; closept) {
    vector npos = point(0, "P", opt);
    @dist += distance( @P, npos );
}

@dist /= len(closept);