<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">use GD::Graph::mixed;
require 'save.pl';

print STDERR "Processing sample62\n";

@data = ( 
    ["1st","2nd","3rd","4th","5th","6th","7th", "8th", "9th"],
    [    9,    8,    9,  8.4,  7.1,  7.5,    8,     3,     3],
    [   .4,   .3,    1,    1,   .3,  1.5,    2,     1,     0],
);

$my_graph = new GD::Graph::mixed();

$my_graph-&gt;set( 
	x_label =&gt; 'X Label',
	y1_label =&gt; 'Y1 label',
	y2_label =&gt; 'Y2 label',
	title =&gt; 'A Mixed Type Graph with Two Axes',
	two_axes =&gt; 1,
	y1_max_value =&gt; 10,
	y2_max_value =&gt; 2.5,
	y_min_value =&gt; 0,
	y_tick_number =&gt; 5,
	long_ticks =&gt; 1,
	x_ticks =&gt; 0,
	legend_marker_width =&gt; 24,
	line_width =&gt; 5,

	bar_spacing =&gt; 4,

	types =&gt; [ qw( bars lines ) ],

	transparent =&gt; 0,
);

$my_graph-&gt;set_legend( qw( one two three four five six ) );
$my_graph-&gt;plot(\@data);
save_chart($my_graph, 'sample62');

</pre></body></html>