| 1 | <?php // content="text/plain; charset=utf-8" | 
|---|
| 2 | require_once ('jpgraph/jpgraph.php'); | 
|---|
| 3 | require_once ('jpgraph/jpgraph_line.php'); | 
|---|
| 4 | require_once ('jpgraph/jpgraph_bar.php'); | 
|---|
| 5 |  | 
|---|
| 6 | function readsunspotdata($aFile, &$aYears, &$aSunspots) { | 
|---|
| 7 | $lines = @file($aFile,FILE_IGNORE_NEW_LINES|FILE_SKIP_EMPTY_LINES); | 
|---|
| 8 | if( $lines === false ) { | 
|---|
| 9 | throw new JpGraphException('Can not read sunspot data file.'); | 
|---|
| 10 | } | 
|---|
| 11 | foreach( $lines as $line => $datarow ) { | 
|---|
| 12 | $split = preg_split('/[\s]+/',$datarow); | 
|---|
| 13 | $aYears[] = substr(trim($split[0]),0,4); | 
|---|
| 14 | $aSunspots[] = trim($split[1]); | 
|---|
| 15 | } | 
|---|
| 16 | } | 
|---|
| 17 |  | 
|---|
| 18 | $year = array(); | 
|---|
| 19 | $ydata = array(); | 
|---|
| 20 | readsunspotdata('yearssn.txt',$year,$ydata); | 
|---|
| 21 |  | 
|---|
| 22 | // Just keep the last 20 values in the arrays | 
|---|
| 23 | $year = array_slice($year, -20); | 
|---|
| 24 | $ydata = array_slice($ydata, -20); | 
|---|
| 25 |  | 
|---|
| 26 | // Width and height of the graph | 
|---|
| 27 | $width = 600; $height = 200; | 
|---|
| 28 |  | 
|---|
| 29 | // Create a graph instance | 
|---|
| 30 | $graph = new Graph($width,$height); | 
|---|
| 31 |  | 
|---|
| 32 | // Specify what scale we want to use, | 
|---|
| 33 | // text = txt scale for the X-axis | 
|---|
| 34 | // int = integer scale for the Y-axis | 
|---|
| 35 | $graph->SetScale('textint'); | 
|---|
| 36 |  | 
|---|
| 37 | // Setup a title for the graph | 
|---|
| 38 | $graph->title->Set('Sunspot example'); | 
|---|
| 39 |  | 
|---|
| 40 | // Setup titles and X-axis labels | 
|---|
| 41 | $graph->xaxis->title->Set('(year)'); | 
|---|
| 42 | $graph->xaxis->SetTickLabels($year); | 
|---|
| 43 |  | 
|---|
| 44 | // Setup Y-axis title | 
|---|
| 45 | $graph->yaxis->title->Set('(# sunspots)'); | 
|---|
| 46 |  | 
|---|
| 47 | // Create the bar plot | 
|---|
| 48 | $barplot=new BarPlot($ydata); | 
|---|
| 49 |  | 
|---|
| 50 | // Add the plot to the graph | 
|---|
| 51 | $graph->Add($barplot); | 
|---|
| 52 |  | 
|---|
| 53 | // Display the graph | 
|---|
| 54 | $graph->Stroke(); | 
|---|
| 55 |  | 
|---|
| 56 | ?> | 
|---|