Discussion :

[Fango]

Bonjour,

je n'arrive pas à trouver cette info (donc je commence a penser que ce n'est pas possible mais je préfère poser la question ici): est il possible de construire des histogrammes avec des barres qui s'empilent (en gros plusieurs couleurs par barre) au lieu de se mettre cote a cote avec le module GD::Graph::bars ?

Merci !

[djibril]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
#!/usr/bin/perl
# This code demonstrates the problem I am having with labels inside
# of a stacked bar chart
 
use strict;
use GD::Graph::hbars;
require "save.pl";
 
my @data = (
["1st","2nd","3rd","4th","5th","6th","7th", "8th", "9th"],
[ 1, 2, 5, 6, 3, 1.5, 1, 3, 4],
[ 1, 1.5, 3, 2, 3, 1.5, 3, 4, 4 ]
);
 
my @dim = (600,400);
my @names = qw/sample1B sample1B-h/;
 
for my $graph (GD::Graph::bars->new(@dim),GD::Graph::hbars->new(@dim)) {
    my $name = shift @names;
    print STDERR "Processing $name\n";
 
	$graph->set_legend('Pass', 'Fail');
	$graph->set(
	x_label => 'X Label',
	y_label => 'Y label',
	title => 'Cumulated bar graph with labels',
	y_max_value => 10,
	y_tick_number => 10,
	y_label_skip => 2,
	bar_spacing => 8,
	cumulate => 'true',
 
	dclrs => [ qw( green lred ) ],
	show_values => 1,
	values_space => 4,
	)
	or warn $graph->error;
	my $format = $graph->export_format;
	$graph->plot(\@data)->$format();
 
	save_chart($graph,$name);
}

cumulate

If this attribute is set to a true value, the data sets will be cumulated. This means that they will be stacked on top of each other. A side effect of this is that overwrite will be set to a true value.

Notes: This only works for bar and area charts at the moment.

If you have negative values in your data sets, setting this option might produce odd results. Of course, the graph itself would be quite meaningless.

[Fango]

Merci ! Ça m'avait échappé sur http://search.cpan.org/...