NAME
Chart::Clicker::Tutorial - A Tutorial for using Chart::Clicker
VERSION
version 2.90
DESCRIPTION
This document aims to provide a tutorial for using Chart::Clicker.
EXAMPLES
Simple chart from a single data source
my $chart = Chart::Clicker->new;
my $series = Chart::Clicker::Data::Series->new(
keys => [ 1,2,3,4,5 ],
values => [ 52,74,52,82,14 ],
);
my $dataset = Chart::Clicker::Data::DataSet->new(
series => [ $series ],
);
$chart ->add_to_datasets( $dataset );
$chart ->write_output( 'chart.png' );
|
Simple chart from multiple data sources
my $chart = Chart::Clicker->new;
my $series1 = Chart::Clicker::Data::Series->new(
keys => [ 1,2,3,4,5 ],
values => [ 52,74,52,82,14 ]
);
my $series2 = Chart::Clicker::Data::Series->new(
keys => [ 1,2,3,4,5 ],
values => [ 34,67,89,45,67 ]
);
my $dataset = Chart::Clicker::Data::DataSet->new(
series => [ $series1 , $series2 ]
);
$chart ->add_to_datasets( $dataset );
$chart ->write_output( 'chart.png' );
|
Simple chart with multiple data sources and custom colors
my $ca = Chart::Clicker::Drawing::ColorAllocator->new;
my $red = Graphics::Color::RGB->new({
red => .75, green => 0, blue => 0, alpha => .8
});
my $green = Graphics::Color::RGB->new({
red => 0, green => .75, blue => 0, alpha => .8
});
my $blue = Graphics::Color::RGB->new({
red => 0, green => 0, blue => .75, alpha => .8
}),
my $chart = Chart::Clicker->new;
my $dataset = Chart::Clicker::Data::DataSet->new;
$dataset ->add_to_series(Chart::Clicker::Data::Series->new(
keys => [ 1,2,3,4,5 ],
values => [ 52,74,52,82,14 ]
));
$ca ->add_to_colors( $blue );
$dataset ->add_to_series(Chart::Clicker::Data::Series->new(
keys => [ 1,2,3,4,5 ],
values => [ 34,67,89,45,67 ]
));
$ca ->add_to_colors( $red );
$dataset ->add_to_series(Chart::Clicker::Data::Series->new(
keys => [ 1,2,3,4,5 ],
values => [ 11,22,33,44,55 ]
));
$ca ->add_to_colors( $green );
$chart ->add_to_datasets( $dataset );
$chart ->color_allocator( $ca );
$chart ->write_output( 'chart.png' );
|
Example 4 : Simple chart with a different render type
my $chart = Chart::Clicker->new;
my $series = Chart::Clicker::Data::Series->new(
keys => [ 1,2,3,4,5 ],
values => [ 52,74,52,82,14 ]
);
my $dataset = Chart::Clicker::Data::DataSet->new(
series => [ $series ]
);
$chart ->add_to_datasets( $dataset );
my $renderer = Chart::Clicker::Renderer::Area->new(
opacity => .75,
);
$chart ->set_renderer( $renderer );
$chart ->write_output( 'chart.png' );
|
Example 5 : Width and Height
my $chart = Chart::Clicker->new( width => 1024, height => 768);
|
Example 6 : PDF (or SVG or PS)
my $chart = Chart::Clicker->new( format => 'pdf' );
$chart ->write_output( 'chart.pdf' );
|
Example 7 : Hide the Legend and X-Axis
my $chart = Chart::Clicker->new;
$chart ->legend->visible(0);
$chart ->get_context( 'default' )->domain_axis->hidden(1);
|
my $chart = Chart::Clicker->new;
$chart ->get_context( 'default' )->range_axis-> format ( '%.3f' );
|
DISCLAIMER
This is a work in progress. If you find errors or would like to make contributions, drop me a line!
AUTHOR
Cory G Watson <gphat@cpan.org>
COPYRIGHT AND LICENSE
This software is copyright (c) 2016 by Cory G Watson.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.