polarex9.php

    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    43
    44
    45
    46
    47
    48
    49
    50
    51
    52
    53
    54
    55
    56
    57
    58
    59
    60
    61
    62
    63

    <?php // content="text/plain; charset=utf-8"
    // A simple Polar graph,

    include "jpgraph/jpgraph.php";
    include "jpgraph/jpgraph_polar.php";

    $data = array(0,1,10,2,30,25,40,60,
              50,110,60,160,70,210,75,230,80,260,85,370,
              90,480,
              95,370,100,260,105,230,
              110,210,120,160,130,110,140,60,
              150,25,170,2,180,1);

    $graph = new PolarGraph(350,320);
    $graph->SetScale('log',100);
    $graph->SetType(POLAR_180);

    // Hide frame around graph (by setting width=0)
    $graph->SetFrame(true,'white',1);

    // Show both major and minor grid lines
    $graph->axis->ShowGrid(true,true);

    // Set color for gradient lines
    $graph->axis->SetGridColor('lightblue:0.9','lightblue:0.9','lightblue:0.9');

    // Set label and axis colors
    $graph->axis->SetColor('black','navy','darkred');

    // Draw the ticks on the bottom side of the radius axis
    $graph->axis->SetTickSide(SIDE_DOWN);

    // Increase the margin for the labels since we changed the
    // side of the ticks.
    $graph->axis->SetLabelMargin(6);

    // Change fonts
    $graph->axis->SetFont(FF_ARIAL,FS_NORMAL,8);
    $graph->axis->SetAngleFont(FF_ARIAL,FS_NORMAL,8);

    // Setup axis title
    $graph->axis->SetTitle('Coverage (in meter)','middle');
    $graph->axis->title->SetFont(FF_FONT1,FS_BOLD);

    // Setup graph title
    $graph->title->Set('Polar plot #9');
    $graph->title->SetFont(FF_ARIAL,FS_BOLD,16);
    $graph->title->SetColor('navy');

    // Setup tab title
    $graph->tabtitle->Set('Microphone #1');
    $graph->tabtitle->SetColor('brown:0.5','lightyellow');

    $p = new PolarPlot($data);
    $p->SetFillColor('lightblue@0.5');
    $p->mark->SetType(MARK_SQUARE);

    $graph->Add($p);

    $graph->Stroke();

    ?>