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 | ?> |
---|