[42] | 1 | <?php // content="text/plain; charset=utf-8"
|
---|
| 2 | require_once ('jpgraph/jpgraph.php');
|
---|
| 3 | require_once ('jpgraph/jpgraph_log.php');
|
---|
| 4 | require_once ('jpgraph/jpgraph_line.php');
|
---|
| 5 | require_once ('jpgraph/jpgraph_scatter.php');
|
---|
| 6 |
|
---|
| 7 |
|
---|
| 8 | $ab2 = array( 1.5, 2.0, 2.5, 3.0, 4.0, 5.0, 6.0, 8.0, 10.0,
|
---|
| 9 | 12.0, 15.0, 20.0, 25.0, 30.0, 40.0, 50.0, 60.0 ,75.0,
|
---|
| 10 | 100., 125., 150.);
|
---|
| 11 | $mn2 = array( 0.5, 0.5, 0.5, 0.5, 0.8, 0.8, 0.8, 0.8, 1.0,
|
---|
| 12 | 1.0, 1.0, 1.0, 1.0, 2.0, 2.0, 2.0, 2.0, 2.0,
|
---|
| 13 | 5.0, 5.0, 5.0);
|
---|
| 14 | $rhos = array(30.0, 31.0, 32.0, 34.0, 35.5, 37.5, 38.0, 39.5, 41.5,
|
---|
| 15 | 43.0, 41.0, 42.0, 42.5, 45.0, 49.0, 53.5, 58.0, 66.5,
|
---|
| 16 | 75.0, 81.0, 89.0);
|
---|
| 17 |
|
---|
| 18 | // Create the graph.
|
---|
| 19 | $graph = new Graph(500,300);
|
---|
| 20 | $graph->SetScale("loglog");
|
---|
| 21 | $graph->SetY2Scale("lin");
|
---|
| 22 | $graph->y2axis->SetColor("blue","blue");
|
---|
| 23 |
|
---|
| 24 | $graph->img->SetMargin(50,70,40,50);
|
---|
| 25 | $graph->title->Set("Geoelektrik");
|
---|
| 26 | $graph->xaxis->title->Set("Auslage ab/2 [m]");
|
---|
| 27 | $graph->yaxis->title->Set("rho_s [Ohm m]");
|
---|
| 28 | $graph->y2axis->title->Set("mn/2 [m]");
|
---|
| 29 | $graph->y2axis->title->SetColor("blue");
|
---|
| 30 | $graph->y2axis->SetTitleMargin(35);
|
---|
| 31 | $graph->title->SetFont(FF_FONT1,FS_BOLD);
|
---|
| 32 | $graph->xaxis->title->SetFont(FF_FONT1,FS_BOLD);
|
---|
| 33 | $graph->yaxis->title->SetFont(FF_FONT1,FS_BOLD);
|
---|
| 34 | $graph->xgrid->Show(true,true);
|
---|
| 35 | $graph->ygrid->Show(true,true);
|
---|
| 36 |
|
---|
| 37 | // Create the linear plot
|
---|
| 38 |
|
---|
| 39 | $lineplot=new LinePlot($rhos,$ab2);
|
---|
| 40 | $lineplot->SetWeight(1);
|
---|
| 41 | $lineplot->mark->SetType(MARK_FILLEDCIRCLE);
|
---|
| 42 | $lineplot->mark->SetWidth(2);
|
---|
| 43 |
|
---|
| 44 | // Create scatter plot
|
---|
| 45 |
|
---|
| 46 | $scplot=new ScatterPlot($mn2,$ab2);
|
---|
| 47 | $scplot->mark->SetType(MARK_FILLEDCIRCLE);
|
---|
| 48 | $scplot->mark->SetColor("blue");
|
---|
| 49 | $scplot->mark->SetWidth(2);
|
---|
| 50 |
|
---|
| 51 | // Add plots to the graph
|
---|
| 52 |
|
---|
| 53 | $graph->AddY2($scplot);
|
---|
| 54 | $graph->Add($lineplot);
|
---|
| 55 |
|
---|
| 56 | // Display the graph
|
---|
| 57 | $graph->Stroke();
|
---|
| 58 |
|
---|
| 59 | ?>
|
---|