addTitle("Polar Vector Chart Demonstration", "arialbi.ttf", 15); # Set center of plot area at (230, 240) with radius 180 pixels $c->setPlotArea(230, 240, 180); # Set the grid style to circular grid $c->setGridStyle(false); # Set angular axis as 0 - 360, with a spoke every 30 units $angularAxisObj = $c->angularAxis(); $angularAxisObj->setLinearScale(0, 360, 30); # Add a polar vector layer to the chart with blue (0000ff) vectors $c->addVectorLayer($radius, $angle, $magnitude, $direction, RadialAxisScale, 0x0000ff ); # output the chart header("Content-type: image/png"); print($c->makeChart2(PNG)); ?>