Algorithm-ClusterPoints
view release on metacpan or search on metacpan
example/draw2-1.pl view on Meta::CPAN
use warnings;
use strict;
use Math::Random qw(random_normal random_uniform_integer);
use List::Util qw(max min);
use GD::Image;
use Algorithm::ClusterPoints;
select STDERR; $|=1; select STDOUT;
# Latitude stats:
# Minimum: 10.318842
# Maximum: 14.124424
# Mean: 11.24719
# Standard Deviation: 0.805771
# Longitude stats:
# Minimum: 21.097507
( run in 1.622 second using v1.01-cache-2.11-cpan-49f99fa48dc )