impulsex4.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
    64
    65
    66
    67
    68
    69
    70
    71
    72
    73
    74
    75
    76
    <?php // content="text/plain; charset=utf-8"
    require_once ("jpgraph/jpgraph.php");
    require_once ("jpgraph/jpgraph_scatter.php");
    require_once ("jpgraph/jpgraph_line.php");
    require_once ("jpgraph/jpgraph_plotline.php");

    $numpoints=50;
    $k=0.05;

    // Create some data points
    for($i=-$numpoints+1; $i<0; ++$i) {
        $datay[$i+$numpoints-1]=exp($k*$i)*cos(2*M_PI/10*$i)*14;
        $datayenv[$i+$numpoints-1]=exp($k*$i)*14;
        $datax[$i+$numpoints-1]=$i;
    }

    for($i=0; $i<$numpoints; ++$i) {
        $datay[$i+$numpoints-1]=exp(-$k*$i)*cos(2*M_PI/10*$i)*14;
        $datayenv[$i+$numpoints-1]=exp(-$k*$i)*14;
        $datax[$i+$numpoints-1]=$i;
    }

    // Setup the basic parameters for the graph
    $graph = new Graph(500,250);
    $graph->SetScale("intlin");

    $graph->SetShadow();
    $graph->SetBox();
    $graph->title->Set("Impuls Example 4");
    $graph->title->SetFont(FF_FONT1,FS_BOLD);

    // Set some other color then the boring default
    $graph->SetColor("lightyellow");
    $graph->SetMarginColor("khaki");

    // Set legend box specification
    $graph->legend->SetFillColor("white");
    $graph->legend->SetLineWeight(2);

    // Set X-axis at the minimum value of Y-axis (default will be at 0)
    $graph->xaxis->SetPos("min");    // "min" will position the x-axis at the minimum value of the Y-axis

    // Extend the margin for the labels on the Y-axis and reverse the direction
    // of the ticks on the Y-axis
    $graph->yaxis->SetLabelMargin(12);
    $graph->xaxis->SetLabelMargin(6);
    $graph->yaxis->SetTickSide(SIDE_LEFT);
    $graph->xaxis->SetTickSide(SIDE_DOWN);

    // Add mark graph with static lines
    $line = new PlotLine(HORIZONTAL,0,"black",2);
    $graph->AddLine($line);

    // Create a new impuls type scatter plot
    $sp1 = new ScatterPlot($datay,$datax);
    $sp1->mark->SetType(MARK_SQUARE);
    $sp1->mark->SetFillColor("red");
    $sp1->mark->SetWidth(3);

    $sp1->SetImpuls();
    $sp1->SetColor("blue");
    $sp1->SetWeight(1);
    $sp1->SetLegend("Non-causal signal");

    $graph->Add($sp1);

    // Create the envelope plot
    $ep1 = new LinePlot($datayenv,$datax);
    $ep1->SetStyle("dotted");
    $ep1->SetLegend("Positive envelope");

    $graph->Add($ep1);

    $graph->Stroke();

    ?>