[Sommaire] [Imprimer]

   1  <?php
   2  // $Id: barintex2.php,v 1.2 2002/07/11 23:27:28 aditus Exp $
   3  include  ("../jpgraph.php");
   4  include  ("../jpgraph_bar.php");
   5  
   6  // Some data
   7  $datay=array(3,1,7,5,12,11,9,4,17);
   8  
   9  // Create the graph and setup the basic parameters 
  10  $graph = new Graph(460,200,'auto');    
  11  $graph->img->SetMargin(40,30,40,40);
  12  $graph->SetScale("textint");
  13  $graph->SetFrame(true,'blue',1); 
  14  $graph->SetColor('lightblue');
  15  $graph->SetMarginColor('lightblue');
  16  
  17  // Add some grace to the top so that the scale doesn't
  18  // end exactly at the max value. 
  19  $graph->yaxis->scale->SetGrace(20);
  20  
  21  // Setup X-axis labels
  22  $a = $gDateLocale->GetShortMonth();
  23  $graph->xaxis->SetTickLabels($a);
  24  $graph->xaxis->SetFont(FF_FONT1);
  25  $graph->xaxis->SetColor('darkblue','black');
  26  
  27  // Stup "hidden" y-axis by given it the same color
  28  // as the background
  29  $graph->yaxis->SetColor('lightblue','darkblue');
  30  $graph->ygrid->SetColor('white');
  31  
  32  // Setup graph title ands fonts
  33  $graph->title->Set('Example of integer Y-scale');
  34  $graph->subtitle->Set('(With "hidden" y-axis)');
  35  
  36  $graph->title->SetFont(FF_FONT2,FS_BOLD);
  37  $graph->xaxis->title->Set("Year 2002");
  38  $graph->xaxis->title->SetFont(FF_FONT2,FS_BOLD);
  39                                
  40  // Create a bar pot
  41  $bplot = new BarPlot($datay);
  42  $bplot->SetFillColor('darkblue');
  43  $bplot->SetColor('darkblue');
  44  $bplot->SetWidth(0.5);
  45  $bplot->SetShadow('darkgray');
  46  
  47  // Setup the values that are displayed on top of each bar
  48  $bplot->value->Show();
  49  // Must use TTF fonts if we want text at an arbitrary angle
  50  $bplot->value->SetFont(FF_ARIAL,FS_NORMAL,8);
  51  $bplot->value->SetFormat('$%d');
  52  // Black color for positive values and darkred for negative values
  53  $bplot->value->SetColor("black","darkred");
  54  $graph->Add($bplot);
  55  
  56  // Finally stroke the graph
  57  $graph->Stroke();
  58  ?>