use Test::More;
BEGIN {
use_ok('Chart::Clicker::Axis');
}
my $label = 'Foo';
# Small Range
{
my $axis = Chart::Clicker::Axis->new(
label => $label,
orientation => 'vertical',
position => 'left',
tick_division_type => 'LinearRounded'
);
ok( defined( $axis->range() ), 'Has range' );
$axis->range->lower(3);
$axis->range->upper(105);
is( $axis->ticks, '5', 'Default number of ticks' );
is_deeply( $axis->divvy(), [ 20, 40, 60, 80, 100 ], 'Nicely rounded tick values - medium scale' );
}
# Larger Range
{
my $axis = Chart::Clicker::Axis->new(
label => $label,
orientation => 'vertical',
position => 'left',
tick_division_type => 'LinearRounded'
);
$axis->range->lower(1);
$axis->range->upper(999123421);
is_deeply(
$axis->divvy(),
[ 0, 100000000, 200000000, 300000000, 400000000, 500000000,
600000000, 700000000, 800000000, 900000000, 1000000000],
'Nicely rounded tick values - large scale 5 ticks'
);
}
# Large range, small tick count
{
my $axis = Chart::Clicker::Axis->new(
label => $label,
orientation => 'vertical',
position => 'left',
tick_division_type => 'LinearRounded'
);
$axis->range->lower(1);
$axis->range->upper(999123421);
$axis->ticks(3);
is_deeply( $axis->divvy(), [ 0, 250000000, 500000000, 750000000, 1000000000 ],
'Nicely rounded tick values - large scale 3 ticks' );
}
# Very small range below 1
{
my $axis = Chart::Clicker::Axis->new(
label => $label,
orientation => 'vertical',
position => 'left',
tick_division_type => 'LinearRounded'
);
$axis->range->lower(0.0072);
$axis->range->upper(0.0078);
$axis->ticks(3);
is_deeply( $axis->divvy(), [ 0.0072, 0.0073, 0.0074, 0.0075, 0.0076, 0.0077, 0.0078 ],
'Nicely rounded tick values - large scale 3 ticks' );
}
# Very small range above 1
{
my $axis = Chart::Clicker::Axis->new(
label => $label,
orientation => 'vertical',
position => 'left',
tick_division_type => 'LinearRounded'
);
$axis->range->lower(1.5672);
$axis->range->upper(1.5679);
$axis->ticks(4);
is_deeply( $axis->divvy(), [ 1.5672, 1.5673, 1.5674, 1.5675, 1.5676, 1.5677, 1.5678, 1.5679 ],
'Nicely rounded tick values - large scale 3 ticks' );
}
done_testing;