Subversion Repositories Sites.obs-saisons.fr

Rev

Go to most recent revision | Blame | Last modification | View Log | RSS feed

<?
$jpgraph = "/usr/local/lib/php/jpgraph-1.17";
//$jpgraph = "/home/fiastre/Desktop/jpgraph-2.1.2/src";
include ("$jpgraph/jpgraph.php");
include ("$jpgraph/jpgraph_line.php");
//include ("$jpgraph/jpgraph_utils.inc");
/*echo "{".$_SESSION['observation']['espece_id'];
echo $_SESSION['observation']['evenement_id'];
echo $_SESSION['observation']['commune_id']."}";
*/

// Some data
//$ydata = array(11,3, 8,12,5 ,1,9, 13,5,7 );
include ("../connect.php");

$evenement_id = $_GET['ev'];
$commune_id = $_GET['com'];
$espece_id=$_GET['esp'];

$req_dates = mysql_query("SELECT DATE_FORMAT(MESURE_DATE,'%d%m'), DATE_FORMAT(MESURE_DATE,'%Y') as ANNEE FROM MESURE,SEQUENCE".
        " where SEQUENCE.SEQUENCE_ID=MESURE.SEQUENCE_ID and".
        " EVENEMENT_ID=$evenement_id and ESPECE_ID=$espece_id".
        " AND MESURE_DATE!='0000-00-00'". 
        " and STATION_ID=$commune_id".
        " order by ANNEE");
$dates = array();
$lastannee = 0;
$nbdates = 1;
while ($obs = mysql_fetch_row($req_dates)) {
  $jour_crt = substr($obs[0],0,2);
  $mois_crt = substr($obs[0],2,2);
  $annee_crt = $obs[1];
  if ($obs[1]!=$lastannee) {
    //on calcule la moyenne pour la commune précédente :
    if ($lastannee != 0)
      $dates[$lastannee] = $dates[$lastannee]/$nbdates;
    //on initialise les variables pour la nouvelle commune
    $nbdates = 1;
    $lastannee=$obs[1];
    $dates[$lastannee] = mktime(0,0,0,$mois_crt,$jour_crt);
  } else {
    $nbdates++;
    $dates[$lastannee] += mktime(0,0,0,$mois_crt,$jour_crt);
  }
}
$dates[$lastannee] = $dates[$lastannee]/$nbdates;

if (sizeof($dates)>0) {
  $dateMin = min ($dates);
  $dateMax = max ($dates);
  $nbDates = sizeof ($dates);
}
else {
  $erreurs[] = "Il n'y a pas encore de données cette année pour cette observation.";
}

$jours = array();
$annees = array();

foreach ($dates as $annee => $date) {
  $annees[] = "$annee";
  $jours[] = $date;

}

//on définit les labels pour les dates
$labelsjours = array();
$nbDemiMois = 0;
while ($dateMin + $nbDemiMois*1209600 <= $dateMax) {
  $labelsjours[$nbDemiMois] = date('d/m',$dateMin+$nbDemiMois*1209600);
  $nbDemiMois++;
}

/*foreach ($labelsjours as $l)
  echo $l;

/*list($tickPositions,$minTickPositions) = 
        DateScaleUtils::GetTicks($jours);
*/
$mois = $gDateLocale->GetShortMonth();
//on tente de trouver l'indice du mois de la date min
$moisMin = date('m',$dateMin);
$derniersMois = array_slice($mois,$moisMin-1);
//on prend le tableau à l'envers : dec, nov, oct, sept etc.
//l'indice où couper est : la taille du tableau moins l'indice du mois
//on réinverse le tableau et obtient au final les premiers mois
$premiersMois = array_reverse(array_slice(
                  array_reverse($mois),sizeof($mois)-$moisMin));
$tickLabels = array_merge($derniersMois,$premiersMois);

/*$tickPositions = array();
$tickLabels = array();
$tickPositions[0] = 0;
$tickLabels[0] = $dateMin;
foreach ($dates as $date) {
  $tickPositions[] = $date;
  $tickLabels[] = date('d/m',$date);
}*/

/*$annees = array('2006','2007');
$jours = array(1508,3008);
for ($i=0; $i<sizeof($annees); $i++) {
  echo "année ".$annees[$i]." : ".$jours[$i].":".is_numeric($jours[$i]).",";
}
*/


// Create the graph. These two calls are always required
$graph = new Graph(600, 800,"auto");    
$graph->SetScale( "textint",$dateMin,$dateMax);
$graph->yscale->ticks->Set(1209600,86400);


//$annees = array('2000','2005','2010');
$graph->xaxis->SetTickLabels($annees); 
$graph->yaxis->SetTickLabels($tickLabels); 

// Create the linear plot
$lineplot =new LinePlot($jours);
$lineplot ->SetColor("blue");

// Add the plot to the graph
$graph->Add( $lineplot);

//Un peu de forme
$graph->title->Set("Date de floraison du pommier");
$graph->img->SetMargin(80,20,20,40);
$graph->xaxis->title->Set("Année");
//$graph->yaxis->title->Set("Date observée");
 $graph->title->SetFont(FF_FONT1,FS_BOLD);
$graph->yaxis->title->SetFont(FF_FONT1,FS_BOLD);
$graph->xaxis->title->SetFont(FF_FONT1,FS_BOLD); 
 $lineplot->mark->SetType(MARK_SQUARE);

// Display the graph
$graph->Stroke(); 

?>