$datay[$i] = rand(1, 10); $datay2[$i] = rand(10, 55); $datay3[$i] = rand(200, 600); $datay4[$i] = rand(500, 800); } // Setup the graph $graph = new Graph\Graph(450, 250); $graph->SetMargin(40, 150, 40, 30); $graph->SetMarginColor('white'); $graph->SetScale('intlin'); $graph->title->Set('Using multiple Y-axis'); $graph->title->SetFont(FF_ARIAL, FS_NORMAL, 14); $graph->SetYScale(0, 'lin'); $graph->SetYScale(1, 'lin'); $graph->SetYScale(2, 'lin'); $p1 = new Plot\LinePlot($datay); $graph->Add($p1); $p2 = new Plot\LinePlot($datay2); $p2->SetColor('teal'); $graph->AddY(0, $p2); $graph->ynaxis[0]->SetColor('teal'); $p3 = new Plot\LinePlot($datay3); $p3->SetColor('red'); $graph->AddY(1, $p3); $graph->ynaxis[1]->SetColor('red'); $p4 = new Plot\LinePlot($datay4); $p4->SetColor('blue'); $graph->AddY(2, $p4); $graph->ynaxis[2]->SetColor('blue'); // Output line $graph->Stroke();
$graph->yaxis->title->Set('Basic Rate'); $graph->yaxis->title->SetFont(FF_ARIAL, FS_BOLD, 10); $graph->yaxis->title->SetColor('black'); $graph->Add($lp1); // First multi Y-axis plot $lp2 = new Plot\LinePlot($datay2); $lp2->SetLegend('2002'); $lp2->mark->SetType(MARK_DIAMOND); $lp2->mark->SetWidth(15); $lp2->mark->SetFillColor('darkred'); $lp2->SetCSIMTargets($targ2, $alts2); $graph->ynaxis[0]->SetColor('darkred'); $graph->ynaxis[0]->title->Set('Rate A'); $graph->ynaxis[0]->title->SetFont(FF_ARIAL, FS_BOLD, 10); $graph->ynaxis[0]->title->SetColor('darkred'); $graph->AddY(0, $lp2); // Second multi Y-axis plot $lp3 = new Plot\LinePlot($datay3); $lp3->SetLegend('2003'); $lp3->mark->SetType(MARK_DIAMOND); $lp3->mark->SetWidth(15); $lp3->mark->SetFillColor('darkgreen'); $lp3->SetCSIMTargets($targ3, $alts3); $graph->ynaxis[1]->SetColor('darkgreen'); $graph->ynaxis[1]->title->Set('Rate B'); $graph->ynaxis[1]->title->SetFont(FF_ARIAL, FS_BOLD, 10); $graph->ynaxis[1]->title->SetColor('darkgreen'); $graph->AddY(1, $lp3); // Send back the HTML page which will call this script again // to retrieve the image. $graph->StrokeCSIM();