### ------------------------------------------------------
### Plot SDPI-$y-$mm-Load-($avg[0],$avg[1])
my $max = max(@{$data[1]},@{$data[2]});     # max val. data pt.
$avg[0] = sum(@{$data[1]})/scalar(@{$data[1]});
$avg[1] = sum(@{$data[2]})/scalar(@{$data[2]});
$avg    = sprintf( "%.1f,%.1f", $avg[0],$avg[1] );
my %opt = (
    title           => "SDPI-$y-$month[0][$m]-Load-($avg)",
    x_label         => "Hour / Day",
    y_label         => 'Forms/Min: Avg.(green) & Max(red)',
    y_min_value     => 0,
    y_max_value     => $max+1,              #ceil($max + $max*0.1),
    y_tick_number   => $max+1,
    y_number_format => "%3d",
    two_axes        => 1,
    show_values     => 1,
    values_vertical => 1,
    values_space    => 8,
 );
plot(\%opt, \@data, 'lp', 400);             # Float
$opt{title} .= '-';                         # Fixed
$opt{y_max_value} = $opt{y_tick_number} = 40;
plot(\%opt, \@data, 'lp', 400);