<?php
require_once "../ScatterPlot.class.php";
$graph = new Graph(400, 400);
$graph->title->set('Impulses');
$graph->title->move(0, 30);
$graph->shadow->setSize(5);
$y = array();
for ($i = 0; $i < 60; $i++) {
$y[] = cos($i / 30 * 2 * M_PI) / (1.5 + $i / 15);
}
$plot = new ScatterPlot($y);
$plot->setBackgroundColor(new VeryLightOrange());
$plot->setSpace(5);
// Set impulses
$plot->setImpulse(new DarkBlue());
$plot->grid->hideVertical();
// Hide ticks
$plot->xAxis->hideTicks();
// Change labels interval
$plot->xAxis->label->setInterval(5);
$plot->mark->setType(MARK_SQUARE);
$plot->mark->setSize(4);
$graph->add($plot);
$graph->draw();
<?php
require_once "../ScatterPlot.class.php";
$graph = new Graph(400, 400);
$graph->shadow->setSize(5);
$graph->title->set('ScatterPlot with values');
$y = array(4, 3, 2, 5, 8, 1, 3, 6, 4, 5);
$x = array(1, 2, 5, 4, 3, 6, 2, 4, 5, 1);
$plot = new ScatterPlot($y, $x);
$plot->setSpace(6, 6, 6, 0);
$plot->setPadding(NULL, NULL, 40, 20);
// Set dashed lines on the grid
$plot->grid->setType(LINE_DASHED);
$plot->mark->setSize(30);
$plot->mark->setFill(new DarkOrange(20));
$plot->label->set($y);
$plot->label->setColor(new White());
$graph->add($plot);
$graph->draw();
private function _renderPlotScatter($groupID, $bubble)
{
$grouping = $this->_chart->getPlotArea()->getPlotGroupByIndex($groupID)->getPlotGrouping();
$scatterStyle = $bubbleSize = $this->_chart->getPlotArea()->getPlotGroupByIndex($groupID)->getPlotStyle();
$seriesCount = $this->_chart->getPlotArea()->getPlotGroupByIndex($groupID)->getPlotSeriesCount();
$seriesPlots = array();
// Loop through each data series in turn
for ($i = 0; $i < $seriesCount; ++$i) {
$dataValuesY = $this->_chart->getPlotArea()->getPlotGroupByIndex($groupID)->getPlotCategoryByIndex($i)->getDataValues();
$dataValuesX = $this->_chart->getPlotArea()->getPlotGroupByIndex($groupID)->getPlotValuesByIndex($i)->getDataValues();
foreach ($dataValuesY as $k => $dataValueY) {
$dataValuesY[$k] = $k;
}
$seriesPlot = new ScatterPlot($dataValuesX, $dataValuesY);
if ($scatterStyle == 'lineMarker') {
$seriesPlot->SetLinkPoints();
$seriesPlot->link->SetColor(self::$_colourSet[self::$_plotColour]);
} elseif ($scatterStyle == 'smoothMarker') {
$spline = new Spline($dataValuesY, $dataValuesX);
list($splineDataY, $splineDataX) = $spline->Get(count($dataValuesX) * self::$_width / 20);
$lplot = new LinePlot($splineDataX, $splineDataY);
$lplot->SetColor(self::$_colourSet[self::$_plotColour]);
$this->_graph->Add($lplot);
}
if ($bubble) {
$this->_formatPointMarker($seriesPlot, 'dot');
$seriesPlot->mark->SetColor('black');
$seriesPlot->mark->SetSize($bubbleSize);
} else {
$marker = $this->_chart->getPlotArea()->getPlotGroupByIndex($groupID)->getPlotValuesByIndex($i)->getPointMarker();
$this->_formatPointMarker($seriesPlot, $marker);
}
$dataLabel = $this->_chart->getPlotArea()->getPlotGroupByIndex($groupID)->getPlotLabelByIndex($i)->getDataValue();
$seriesPlot->SetLegend($dataLabel);
$this->_graph->Add($seriesPlot);
}
}
<?php
require_once "../ScatterPlot.class.php";
$graph = new Graph(400, 400);
$graph->title->set('Simple ScatterPlot');
$y = array(1, 10, 3, -4, 1, 4, 8, 7);
$x = array(0.5, 0.5, 3, 5, 2, 3, 4, 1.5);
$plot = new ScatterPlot($y, $x);
$plot->setBackgroundColor(new VeryLightGray());
$plot->setPadding(NULL, NULL, 40, 20);
$plot->legend->add($plot, 'Some points', LEGEND_MARKONLY);
$graph->add($plot);
$graph->draw();
$lr = new LinearRegression($datax, $datay);
list($stderr, $corr) = $lr->GetStat();
list($xd, $yd) = $lr->GetY(0, 19);
// Create the graph
$graph = new Graph\Graph(300, 250);
$graph->SetScale('linlin');
// Setup title
$graph->title->Set("Linear regression");
$graph->title->SetFont(FF_ARIAL, FS_BOLD, 14);
$graph->subtitle->Set('(stderr=' . sprintf('%.2f', $stderr) . ', corr=' . sprintf('%.2f', $corr) . ')');
$graph->subtitle->SetFont(FF_ARIAL, FS_NORMAL, 12);
// make sure that the X-axis is always at the
// bottom at the plot and not just at Y=0 which is
// the default position
$graph->xaxis->SetPos('min');
// Create the scatter plot with some nice colors
$sp1 = new ScatterPlot($datay, $datax);
$sp1->mark->SetType(MARK_FILLEDCIRCLE);
$sp1->mark->SetFillColor("red");
$sp1->SetColor("blue");
$sp1->SetWeight(3);
$sp1->mark->SetWidth(4);
// Create the regression line
$lplot = new Plot\LinePlot($yd);
$lplot->SetWeight(2);
$lplot->SetColor('navy');
// Add the pltos to the line
$graph->Add($sp1);
$graph->Add($lplot);
// ... and stroke
$graph->Stroke();
<?php
// content="text/plain; charset=utf-8"
require_once 'jpgraph/jpgraph.php';
require_once 'jpgraph/jpgraph_scatter.php';
$datay = array(20, 22, 12, 13, 17, 20, 16, 19, 30, 31, 40, 43);
$graph = new Graph(300, 200);
$graph->SetScale("textlin");
$graph->SetShadow();
$graph->img->SetMargin(40, 40, 40, 40);
$graph->title->Set("Simple mpuls plot");
$graph->title->SetFont(FF_FONT1, FS_BOLD);
$sp1 = new ScatterPlot($datay);
$sp1->mark->SetType(MARK_SQUARE);
$sp1->SetImpuls();
$graph->Add($sp1);
$graph->Stroke();
$c = "red";
}
return array(floor($aVal / 3), "", $c);
}
// Setup a basic graph
$graph = new Graph(400, 300, 'auto');
$graph->SetScale("linlin");
$graph->img->SetMargin(40, 100, 40, 40);
$graph->SetShadow();
$graph->title->Set("Example of ballon scatter plot");
// Use a lot of grace to get large scales
$graph->yaxis->scale->SetGrace(50, 10);
// Make sure X-axis as at the bottom of the graph
$graph->xaxis->SetPos('min');
// Create the scatter plot
$sp1 = new ScatterPlot($datay, $datax);
$sp1->mark->SetType(MARK_FILLEDCIRCLE);
// Uncomment the following two lines to display the values
$sp1->value->Show();
$sp1->value->SetFont(FF_FONT1, FS_BOLD);
// Specify the callback
$sp1->mark->SetCallback("FCallback");
// Setup the legend for plot
$sp1->SetLegend('Year 2002');
// Add the scatter plot to the graph
$graph->Add($sp1);
// ... and send to browser
$graph->Stroke();
?>
/**
* add plot to graph
* @param string $pType plot types self::PT_*
* @param array $pOptions plot options
* @param boolean $pAdd if false, return plot instead of adding to graph
* @return object plot, if not rendered directly
*/
public function addPlot($pType = self::PT_LINE, $pOptions = array(), $pAdd = true)
{
$file = self::$JPGRAPH_DIR . \DIRECTORY_SEPARATOR . self::$GRAPH_FILES[self::$GRAPH_TYPES[$pType]];
if (\file_exists($file)) {
require_once $file;
}
if (!(count($this->dataX) > 0)) {
$this->dataX = false;
}
switch ($pType) {
case self::PT_LINE:
$plot = new \LinePlot($this->dataY, $this->dataX);
break;
case self::PT_AREA:
$plot = new \LinePlot($this->dataY, $this->dataX);
if (\array_key_exists('color', $pOptions)) {
$plot->SetFillColor($pOptions['color']);
}
break;
case self::PT_BAR:
$plot = new \BarPlot($this->dataY, $this->dataX);
break;
case self::PT_ERROR:
$plot = new \ErrorPlot($this->dataY, $this->dataY);
break;
case self::PT_FIELD:
$plot = new \FieldPlot($this->dataY, $this->dataX);
break;
case self::PT_STOCK:
$plot = new \StockPlot($this->dataY, $this->dataX);
break;
case self::PT_SCATTER:
$plot = new \ScatterPlot($this->dataY, $this->dataX);
break;
case self::PT_BALLOON:
$plot = new \ScatterPlot($this->dataY, $this->dataX);
break;
case self::PT_IMPULS:
$plot = new \ScatterPlot($this->dataY, $this->dataX);
$plot->SetImpuls();
break;
case self::PT_PIE:
$this->graph = new \PieGraph(self::$WIDTH, self::$HEIGHT);
$plot = new \PiePlot($this->data);
break;
}
if ($pAdd) {
$this->plots[] = $plot;
$this->graph->Add($plot);
} else {
return $plot;
}
}
$graph->Add($sp);
if (count($rv)) {
if (isset($rvMedianValue)) {
$datax = array();
$datay = array();
foreach ($rv as $x => $y) {
$datax[] = $x;
$datay[] = $rvMedianValue;
}
$lp = new LinePlot($datay, $datax);
$lp->SetColor('red');
$lp->SetWeight(1);
$graph->Add($lp);
}
$datax = array();
$datay = array();
foreach ($rv as $x => $y) {
$datax[] = $x;
$datay[] = $y;
}
$sp = new ScatterPlot($datay, $datax);
$sp->mark->SetFillColor('red');
$sp->SetLegend('Repeat View');
$graph->Add($sp);
}
}
if (isset($graph)) {
$graph->Stroke();
} else {
header("HTTP/1.0 404 Not Found");
}
<?php
/*
* This work is hereby released into the Public Domain.
* To view a copy of the public domain dedication,
* visit http://creativecommons.org/licenses/publicdomain/ or send a letter to
* Creative Commons, 559 Nathan Abbott Way, Stanford, California 94305, USA.
*
*/
require_once "../../ScatterPlot.class.php";
$graph = new Graph(300, 300);
$graph->title->set('One value!');
$y = array(mt_rand(-42, 42));
$plot = new ScatterPlot($y);
$plot->setPadding(NULL, NULL, 40, 20);
// Set dashed lines on the grid
$plot->grid->setType(LINE_DASHED);
$plot->mark->setSize(mt_rand(0, 60));
$plot->mark->setFill(new Black(mt_rand(0, 50)));
$plot->label->set($y);
$plot->label->setColor(new White());
$graph->add($plot);
$graph->draw();
<?php
require_once "../ScatterPlot.class.php";
$graph = new Graph(400, 400);
$graph->title->set('Linked ScatterPlot');
$y = array(1, 10, 3, -4, 1, 4, 8, 7);
$x = array(0.5, 0.5, 3, 5, 2, 3, 4, 1.5);
$plot = new ScatterPlot($y, $x);
$plot->setBackgroundColor(new VeryLightGray());
$plot->setPadding(NULL, NULL, 40, 20);
$plot->link(TRUE, new DarkBlue());
$graph->add($plot);
$graph->draw();
<?php
require_once "../ScatterPlot.class.php";
$graph = new Graph(400, 400);
$center = 5;
$x = array();
$y = array();
for ($i = 0; $i <= 30; $i++) {
$rad = $i / 30 * 2 * M_PI;
$x[] = $center + cos($rad) * $center;
$y[] = $center + sin($rad) * $center;
}
$plot = new ScatterPlot($y, $x);
$plot->setBackgroundColor(new VeryLightGray());
$plot->setPadding(30, 30, 30, 30);
$plot->setSpace(5, 5, 5, 5);
$plot->link(TRUE, new DarkGreen());
$plot->mark->setFill(new DarkOrange());
$plot->mark->setType(MARK_SQUARE, 4);
$plot->setXAxis(PLOT_BOTH);
$plot->setXAxisZero(FALSE);
$plot->setYAxis(PLOT_BOTH);
$plot->legend->add($plot, 'A circle', LEGEND_MARK);
$plot->legend->setPosition(0.5, 0.5);
$plot->legend->setAlign(LEGEND_CENTER, LEGEND_MIDDLE);
$graph->add($plot);
$graph->draw();
$datay2[$x] = 0;
}
}
//===========
$graph = new Graph(750, 450);
$graph->img->SetMargin(70, 40, 40, 80);
$graph->img->SetAntiAliasing();
$graph->SetScale("textlin");
$graph->SetShadow();
$graph->title->Set(strtoupper($pabrik) . " Tbs Diolah dan Sisa " . $periode);
$graph->title->SetFont(FF_DEFAULT, FS_NORMAL, 14);
$graph->xaxis->SetFont(FF_DEFAULT, FS_NORMAL, 11);
$graph->xaxis->SetTickLabels($labels);
$graph->xaxis->SetLabelAngle(45);
$p1 = new ScatterPlot($datay1);
$p2 = new ScatterPlot($datay2);
$p1->SetLegend('Diolah');
$p2->SetLegend('Sisa');
$graph->legend->Pos(0.02, 0.03);
$p1->mark->SetType(MARK_SQUARE);
$p1->SetImpuls();
$p1->mark->SetFillColor("red");
$p1->mark->SetWidth(4);
$p1->SetColor("blue");
$p2->mark->SetType(MARK_FILLEDCIRCLE);
$p2->SetImpuls();
$p2->mark->SetFillColor("orange");
$p2->mark->SetWidth(4);
$p2->SetColor("black");
$p1->SetCenter();
$graph->Add(array($p1, $p2));
<?php
require_once "../ScatterPlot.class.php";
$graph = new Graph(400, 400);
$graph->shadow->setSize(5);
$y = array();
for ($i = 0; $i < 60; $i++) {
$y[] = cos($i / 30 * 2 * M_PI);
}
$plot = new ScatterPlot($y);
$plot->setSpace(6, 6);
// Set impulses
$plot->setImpulse(new DarkGreen());
$plot->grid->hideVertical();
// Hide axis labels and ticks
$plot->xAxis->label->hide();
$plot->xAxis->hideTicks();
$plot->mark->setType(MARK_SQUARE);
$plot->mark->setSize(4);
$graph->add($plot);
$graph->draw();
$group->setSpace(5, 5, 5, 5);
$group->legend->setPosition(0.82, 0.1);
$group->legend->setAlign(LEGEND_CENTER, LEGEND_MIDDLE);
function getCircle($size)
{
$center = 0;
$x = array();
$y = array();
for ($i = 0; $i <= 20; $i++) {
$rad = $i / 20 * 2 * M_PI;
$x[] = $center + cos($rad) * $size;
$y[] = $center + sin($rad) * $size;
}
return array($x, $y);
}
list($x, $y) = getCircle(3);
$plot = new ScatterPlot($y, $x);
$plot->link(TRUE, new DarkBlue());
$plot->mark->setFill(new DarkPink());
$plot->mark->setType(MARK_CIRCLE, 6);
$group->legend->add($plot, 'Circle #1', LEGEND_MARK);
$group->add($plot);
list($x, $y) = getCircle(5);
$plot = new ScatterPlot($y, $x);
$plot->link(TRUE, new DarkGreen());
$plot->mark->setFill(new DarkOrange());
$plot->mark->setType(MARK_SQUARE, 4);
$group->legend->add($plot, 'Circle #2', LEGEND_MARK);
$group->add($plot);
$graph->add($group);
$graph->draw();
$plot->link(TRUE, make_color('prv_color', '40FFFF'));
$plot->mark->setSize(make_num('prv_mark', 10));
$plot->mark->setFill(make_color('prv_markcolor', 'F0F0F0'));
$plot->setThickness(make_num('prv_thick', 5));
$plot->setYAxis(PLOT_LEFT);
$plot->setYMin($min);
$plot->setYMax($max);
$grp->add($plot);
}
if ($val_ytd) {
$xkeys = array();
foreach ($val_ytd as $k => $v) {
$xkeys[$k] = $k + 0.5;
}
//for ($i=0;isset($val_ytd[$i]);$i++) $xkeys[$i]=$i+.5;
$plot = new ScatterPlot(array_values($val_ytd), array_values($xkeys));
$plot->link(TRUE, make_color('ytd_color', '40FFFF'));
$plot->mark->setSize(make_num('ytd_mark', 10));
$plot->mark->setFill(make_color('ytd_markcolor', 'F0F0F0'));
$plot->setThickness(make_num('ytd_thick', 5));
$plot->setYAxis(PLOT_LEFT);
$plot->setYMin($min);
$plot->setYMax($max);
$grp->add($plot);
}
$grp->axis->bottom->setLabelText(array('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec'));
$grp->axis->left->label->setCallbackFunction('FmtAmount');
set_font($grp->axis->bottom->label, 'x_font');
set_font($grp->axis->left->label, 'y_font');
set_font($grp->axis->right->label, 'y_font');
$graph->border->hide();
require_once 'jpgraph/jpgraph.php';
require_once 'jpgraph/jpgraph_scatter.php';
// Make a circle with a scatterplot
$steps = 16;
for ($i = 0; $i < $steps; ++$i) {
$a = 2 * M_PI / $steps * $i;
$datax[$i] = cos($a);
$datay[$i] = sin($a);
}
$graph = new Graph(300, 200);
$graph->SetScale("linlin");
$graph->img->SetMargin(40, 40, 40, 40);
$graph->SetShadow();
$graph->title->Set("Linked scatter plot");
$graph->title->SetFont(FF_FONT1, FS_BOLD);
// 10% top and bottom grace
$graph->yscale->SetGrace(5, 5);
$graph->xscale->SetGrace(1, 1);
$sp1 = new ScatterPlot($datay, $datax);
$sp1->mark->SetType(MARK_FILLEDCIRCLE);
$sp1->mark->SetFillColor("red");
$sp1->SetColor("blue");
//$sp1->SetWeight(3);
$sp1->mark->SetWidth(4);
$sp1->SetLinkPoints();
$graph->Add($sp1);
$graph->Stroke();
?>
<?php
require_once "../../ScatterPlot.class.php";
$graph = new Graph(300, 240);
$graph->title->set('Simple ScatterPlot');
$graph->shadow->setSize(4);
$y = array(1, 1.3, 1.8, 1.6, 10, 7, 8, 3, 4, 2, 4);
$x = array(0.5, 0.7, 0.65, 0.9, 0.5, 1.5, 4, 3, 5, 2, 2);
$plot = new ScatterPlot($y, $x);
$plot->setBackgroundColor(new Color(255, 245, 220));
$plot->mark->setSize(15);
$plot->mark->setFill(new RadialGradient(new LightRed(), new Red()));
$plot->setSpace(6, 6, 6, 0);
$plot->setPadding(25, NULL, 40, 20);
$graph->add($plot);
$graph->draw();
function print_graph($g, $pgwidth)
{
$splines = false;
$bandw = false;
$percent = false;
$show_percent = false;
$stacked = false;
$h = false;
$show_values = false;
$hide_grid = false;
$hide_y_axis = false;
if (isset($g['attr']['TYPE']) && $g['attr']['TYPE']) {
$type = strtolower($g['attr']['TYPE']);
}
if (!in_array($type, array('bar', 'horiz_bar', 'line', 'radar', 'pie', 'pie3d', 'xy', 'scatter'))) {
$type = 'bar';
}
// Default=bar
if (isset($g['attr']['STACKED']) && $g['attr']['STACKED']) {
$stacked = true;
}
// stacked for bar or horiz_bar
if (isset($g['attr']['SPLINES']) && $g['attr']['SPLINES'] && $type == 'xy') {
$splines = true;
}
// splines for XY line graphs
if (isset($g['attr']['BANDW']) && $g['attr']['BANDW']) {
$bandw = true;
}
// black and white
if (isset($g['attr']['LEGEND-OVERLAP']) && $g['attr']['LEGEND-OVERLAP']) {
$overlap = true;
}
// avoid overlap of Legends over graph (line, bar, horiz_bar only)
if (isset($g['attr']['PERCENT']) && $g['attr']['PERCENT'] && $type != 'xy' && $type != 'scatter') {
$percent = true;
}
// Show data series as percent of total in series
if (isset($g['attr']['SHOW-VALUES']) && $g['attr']['SHOW-VALUES']) {
$show_values = true;
}
// Show the individual data values
if (isset($g['attr']['HIDE-GRID']) && $g['attr']['HIDE-GRID']) {
$hide_grid = true;
}
// Hide the y-axis gridlines
if (isset($g['attr']['HIDE-Y-AXIS']) && $g['attr']['HIDE-Y-AXIS']) {
$hide_y_axis = true;
}
// Hide the y-axis
// Antialias: If true - better quality curves, but graph line will only be 1px even in PDF 300dpi
// default=true for most except line and radar
if (isset($g['attr']['ANTIALIAS']) && ($g['attr']['ANTIALIAS'] == '' || $g['attr']['ANTIALIAS'] == 0)) {
$antialias = false;
} else {
if (isset($g['attr']['ANTIALIAS']) && $g['attr']['ANTIALIAS'] > 0) {
$antialias = true;
} else {
if ($type == 'line' || $type == 'radar') {
$antialias = false;
} else {
$antialias = true;
}
}
}
if ($g['attr']['DPI']) {
$dpi = intval($g['attr']['DPI']);
}
if (!$dpi || $dpi < 50 || $dpi > 2400) {
$dpi = 150;
}
// Default dpi 150
$k = 0.2645 / 25.4 * $dpi;
// mPDF 4.5.009
global $JpgUseSVGFormat;
if (isset($JpgUseSVGFormat) && $JpgUseSVGFormat) {
$img_type = 'svg';
$k = 1;
// Overrides as Vector scale does not need DPI
} else {
$img_type = 'png';
}
if (isset($g['attr']['TITLE']) && $g['attr']['TITLE']) {
$title = $g['attr']['TITLE'];
}
if (isset($g['attr']['LABEL-X']) && $g['attr']['LABEL-X']) {
$xlabel = $g['attr']['LABEL-X'];
}
// NOT IMPLEMENTED??????
if (isset($g['attr']['LABEL-Y']) && $g['attr']['LABEL-Y']) {
$ylabel = $g['attr']['LABEL-Y'];
}
if (isset($g['attr']['AXIS-X']) && $g['attr']['AXIS-X']) {
$xaxis = strtolower($g['attr']['AXIS-X']);
}
if (!in_array($xaxis, array('text', 'lin', 'linear', 'log'))) {
$xaxis = 'text';
}
// Default=text
if ($xaxis == 'linear') {
$xaxis = 'lin';
}
if (isset($g['attr']['AXIS-Y']) && $g['attr']['AXIS-Y']) {
$yaxis = strtolower($g['attr']['AXIS-Y']);
}
if (!in_array($yaxis, array('lin', 'linear', 'log', 'percent'))) {
$yaxis = 'lin';
}
// Default=lin
if ($yaxis == 'percent') {
$show_percent = true;
$yaxis = 'lin';
}
// Show percent sign on scales
if ($yaxis == 'linear') {
$yaxis = 'lin';
}
if ($splines) {
$xaxis = 'lin';
}
$axes = $xaxis . $yaxis;
// e.g.textlin, textlog, loglog, loglin, linlog (XY)
// mPDF 4.0
if (isset($g['attr']['cWIDTH']) && $g['attr']['cWIDTH']) {
$w = $g['attr']['cWIDTH'] / 0.2645;
}
// pixels
if (isset($g['attr']['cHEIGHT']) && $g['attr']['cHEIGHT']) {
$h = $g['attr']['cHEIGHT'] / 0.2645;
}
if (isset($g['attr']['SERIES']) && strtolower($g['attr']['SERIES']) == 'rows') {
$dataseries = 'rows';
} else {
$dataseries = 'cols';
}
// Defaults - define data
$rowbegin = 2;
$colbegin = 2;
if ($type == 'scatter' || $type == 'xy') {
if ($dataseries == 'rows') {
$rowbegin = 1;
} else {
$colbegin = 1;
}
}
$rowend = 0;
$colend = 0;
if (isset($g['attr']['DATA-ROW-BEGIN']) && ($g['attr']['DATA-ROW-BEGIN'] === '0' || $g['attr']['DATA-ROW-BEGIN'] > 0)) {
$rowbegin = $g['attr']['DATA-ROW-BEGIN'];
}
if (isset($g['attr']['DATA-COL-BEGIN']) && ($g['attr']['DATA-COL-BEGIN'] === '0' || $g['attr']['DATA-COL-BEGIN'] > 0)) {
$colbegin = $g['attr']['DATA-COL-BEGIN'];
}
if (isset($g['attr']['DATA-ROW-END']) && ($g['attr']['DATA-ROW-END'] === '0' || $g['attr']['DATA-ROW-END'] != 0)) {
$rowend = $g['attr']['DATA-ROW-END'];
}
if (isset($g['attr']['DATA-COL-END']) && ($g['attr']['DATA-COL-END'] === '0' || $g['attr']['DATA-COL-END'] != 0)) {
$colend = $g['attr']['DATA-COL-END'];
}
$nr = count($g['data']);
$nc = 0;
foreach ($g['data'] as $r) {
$cc = 0;
foreach ($r as $c) {
$cc++;
}
$nc = max($nc, $cc);
}
if ($colend == 0) {
$colend = $nc;
} else {
if ($colend < 0) {
$colend = $nc + $colend;
}
}
if ($rowend == 0) {
$rowend = $nr;
} else {
if ($rowend < 0) {
$rowend = $nr + $rowend;
}
}
if ($colend < $colbegin) {
$colend = $colbegin;
}
if ($rowend < $rowbegin) {
$rowend = $rowbegin;
}
// if ($type == 'xy' || $type=='scatter') { $colstart=0; }
// Get Data + Totals
$data = array();
$totals = array();
for ($r = $rowbegin - 1; $r < $rowend; $r++) {
for ($c = $colbegin - 1; $c < $colend; $c++) {
if (isset($g['data'][$r][$c])) {
$g['data'][$r][$c] = floatval($g['data'][$r][$c]);
} else {
$g['data'][$r][$c] = 0;
}
if ($dataseries == 'rows') {
$data[$r + 1 - $rowbegin][$c + 1 - $colbegin] = $g['data'][$r][$c];
$totals[$r + 1 - $rowbegin] += $g['data'][$r][$c];
} else {
$data[$c + 1 - $colbegin][$r + 1 - $rowbegin] = $g['data'][$r][$c];
if (isset($totals[$c + 1 - $colbegin])) {
$totals[$c + 1 - $colbegin] += $g['data'][$r][$c];
} else {
$totals[$c + 1 - $colbegin] = $g['data'][$r][$c];
}
}
}
}
// PERCENT
if ($percent && $type != 'pie' && $type != 'pie3d') {
for ($r = 0; $r < count($data); $r++) {
for ($c = 0; $c < count($data[$r]); $c++) {
$data[$r][$c] = $data[$r][$c] / $totals[$r] * 100;
}
}
}
// Get Legends and labels
$legends = array();
$labels = array();
$longestlegend = 0;
$longestlabel = 0;
if ($dataseries == 'cols') {
if ($colbegin > 1) {
for ($r = $rowbegin - 1; $r < $rowend; $r++) {
$legends[$r + 1 - $rowbegin] = $g['data'][$r][0];
$longestlegend = max($longestlegend, strlen($g['data'][$r][0]));
}
}
if ($rowbegin > 1) {
for ($c = $colbegin - 1; $c < $colend; $c++) {
$labels[$c + 1 - $colbegin] = $g['data'][0][$c];
$longestlabel = max($longestlabel, strlen($g['data'][0][$c]));
}
}
} else {
if ($dataseries == 'rows') {
if ($colbegin > 1) {
for ($r = $rowbegin - 1; $r < $rowend; $r++) {
$labels[$r + 1 - $rowbegin] = $g['data'][$r][0];
$longestlabel = max($longestlabel, strlen($g['data'][$r][0]));
}
}
if ($rowbegin > 1) {
for ($c = $colbegin - 1; $c < $colend; $c++) {
$legends[$c + 1 - $colbegin] = $g['data'][0][$c];
$longestlegend = max($longestlegend, strlen($g['data'][0][$c]));
}
}
}
}
// Default sizes
$defsize = array();
$defsize['pie'] = array('w' => 600, 'h' => 300);
$defsize['pie3d'] = array('w' => 600, 'h' => 300);
$defsize['radar'] = array('w' => 600, 'h' => 300);
$defsize['line'] = array('w' => 600, 'h' => 400);
$defsize['xy'] = array('w' => 600, 'h' => 400);
$defsize['scatter'] = array('w' => 600, 'h' => 400);
$defsize['bar'] = array('w' => 600, 'h' => 400);
$defsize['horiz_bar'] = array('w' => 600, 'h' => 500);
// Use default ratios
if ($w && !$h) {
$h = $w * $defsize[$type]['h'] / $defsize[$type]['w'];
}
if ($h && !$w) {
$w = $h * $defsize[$type]['w'] / $defsize[$type]['h'];
}
if (!$h && !$w) {
$w = $defsize[$type]['w'];
$h = $defsize[$type]['h'];
}
if (count($data) > 0 && $type) {
$figure_file = "graph_cache/" . rand(11111, 999999999) . "." . $img_type;
if ($bandw) {
$colours = array('snow1', 'black', 'snow4', 'snow3', 'snow2', 'cadetblue4', 'cadetblue3', 'cadetblue1', 'bisque4', 'bisque2', 'beige');
} else {
$colours = array('cyan', 'darkorchid4', 'cadetblue3', 'khaki1', 'darkolivegreen2', 'cadetblue4', 'coral', 'cyan4', 'rosybrown3', 'wheat1');
}
$fills = array('navy', 'orange', 'red', 'yellow', 'purple', 'navy', 'orange', 'red', 'yellow', 'purple');
$patterns = array(PATTERN_DIAG1, PATTERN_CROSS1, PATTERN_STRIPE1, PATTERN_DIAG3, PATTERN_CROSS2, PATTERN_DIAG2, PATTERN_DIAG4, PATTERN_CROSS3, PATTERN_CROSS4, PATTERN_STRIPE1);
$markers = array(MARK_DIAMOND, MARK_SQUARE, MARK_CIRCLE, MARK_UTRIANGLE, MARK_DTRIANGLE, MARK_FILLEDCIRCLE, MARK_CROSS, MARK_STAR, MARK_X);
// LEGENDS
if ($type == 'pie' || $type == 'pie3d') {
$graph = new PieGraph($w * $k, $h * $k);
} else {
if ($type == 'radar') {
$graph = new RadarGraph($w * $k, $h * $k);
} else {
$graph = new Graph($w * $k, $h * $k);
}
}
// mPDF 4.5.009
// $graph->img->SetImgFormat($img_type) ;
// if (strtoupper($img_type)=='JPEG') { $graph->img->SetQuality(90); }
if ($antialias) {
$graph->img->SetAntiAliasing();
}
$graph->SetShadow(true, 2 * $k);
$graph->SetMarginColor("white");
// TITLE
$graph->title->Set($title);
$graph->title->SetMargin(10 * $k);
$graph->title->SetFont(FF_USERFONT, FS_BOLD, 11 * $k);
$graph->title->SetColor("black");
$graph->legend->SetLineSpacing(3 * $k);
$graph->legend->SetMarkAbsSize(6 * $k);
$graph->legend->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
// Set GRAPH IMAGE MARGINS
if ($type == 'pie' || $type == 'pie3d') {
$psize = 0.3;
$pposxabs = $w / 2;
$pposy = 0.55;
if ($longestlegend) {
// if legend showing
$pposxabs -= ($longestlegend * 5 + 20) / 2;
}
$pposx = $pposxabs / $w;
$graph->legend->Pos(0.02, 0.5, 'right', 'center');
} else {
if ($type == 'radar') {
$psize = 0.5;
$pposxabs = $w / 2;
$pposy = 0.55;
if ($longestlabel) {
// if legend showing
$pposxabs -= ($longestlabel * 5 + 20) / 2;
}
$pposx = $pposxabs / $w;
$graph->legend->Pos(0.02, 0.5, 'right', 'center');
} else {
if ($type == 'xy' || $type == 'scatter') {
$pml = 50;
$pmr = 20;
$pmt = 60;
$pmb = 50;
$xaxislblmargin = $pmb - 30;
$yaxislblmargin = $pml - 15;
$graph->legend->Pos(0.02, 0.1, 'right', 'top');
} else {
if ($type == 'line' || $type == 'bar') {
$pml = 50;
$pmr = 20;
$pmt = 60;
$pmb = 50;
$xlangle = 0;
$ll = $longestlegend * 5;
// 45 degrees 8pt fontsize
if ($ll > 5 || $ll > 3 && count($data) > 10) {
$pmb = max($pmb, $ll + 30);
$xlangle = 50;
}
$xaxislblmargin = $pmb - 30;
$yaxislblmargin = $pml - 15;
if ($longestlabel && !$overlap) {
// if legend showing
$pmr = $longestlabel * 5 + 40;
}
$graph->legend->Pos(0.02, 0.1, 'right', 'top');
} else {
if ($type == 'horiz_bar') {
$pml = 50;
$pmr = 20;
$pmt = 50;
$pmb = 45;
$ll = $longestlegend * 6.5;
// 8pt fontsize
$pml = max($pml, $ll + 20);
$xaxislblmargin = $pml - 20;
$yaxislblmargin = $pmb - 15;
if ($longestlabel && !$overlap) {
// if legend showing
$pmr = $longestlabel * 5 + 40;
}
$graph->legend->Pos(0.02, 0.1, 'right', 'top');
}
}
}
}
}
// DRAW THE GRAPHS
if ($type == 'pie') {
$p1 = new PiePlot($data[0]);
$p1->SetSliceColors($colours);
if ($show_values) {
$p1->value->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
if ($percent) {
$p1->SetLabelType(PIE_VALUE_PERADJ);
} else {
$p1->SetLabelType(PIE_VALUE_ABS);
}
if ($percent || $show_percent) {
$p1->value->SetFormat("%d%%");
} else {
$p1->value->SetFormat("%s");
}
// Enable and set policy for guide-lines. Make labels line up vertically
$p1->SetGuideLines(true);
$p1->SetGuideLinesAdjust(1.5);
} else {
$p1->value->Show(false);
}
$p1->SetLegends($legends);
$p1->SetSize($psize);
$p1->SetCenter($pposx, $pposy);
if ($labels[0]) {
$graph->subtitle->Set($labels[0]);
$graph->subtitle->SetMargin(10 * $k);
$graph->subtitle->SetFont(FF_USERFONT, FS_BOLD, 11 * $k);
$graph->subtitle->SetColor("black");
}
$graph->Add($p1);
} else {
if ($type == 'pie3d') {
$p1 = new PiePlot3d($data[0]);
$p1->SetSliceColors($colours);
if ($show_values) {
$p1->value->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
if ($percent) {
$p1->SetLabelType(PIE_VALUE_PERADJ);
} else {
$p1->SetLabelType(PIE_VALUE_ABS);
}
if ($percent || $show_percent) {
$p1->value->SetFormat("%d%%");
} else {
$p1->value->SetFormat("%s");
}
} else {
$p1->value->Show(false);
}
$p1->SetLegends($legends);
$p1->SetEdge();
$p1->SetSize($psize);
$p1->SetCenter($pposx, $pposy);
if ($labels[0]) {
$graph->subtitle->Set($labels[0]);
$graph->subtitle->SetMargin(10 * $k);
$graph->subtitle->SetFont(FF_USERFONT, FS_BOLD, 11 * $k);
$graph->subtitle->SetColor("black");
}
$graph->Add($p1);
} else {
if ($type == 'radar') {
$graph->SetSize($psize);
$graph->SetPos($pposx, $pposy);
$graph->SetTitles($legends);
// labels each axis
$graph->axis->title->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->axis->title->SetMargin(5 * $k);
$graph->axis->SetWeight(1 * $k);
$graph->axis->HideLabels();
$graph->axis->SetFont(FF_USERFONT, FS_NORMAL, 6 * $k);
$graph->HideTickMarks();
$group = array();
foreach ($data as $series => $dat) {
$rdata = array();
foreach ($data[$series] as $row) {
$rdata[] = $row;
}
if (count($rdata) < 3) {
die("ERROR::Graph::Cannot create a Radar Plot with less than 3 data points.");
}
// Create the radar plot
$bplot = new RadarPlot($rdata);
$bplot->mark->SetType($markers[$series]);
$bplot->mark->SetFillColor($colours[$series]);
$bplot->mark->SetWidth(3 * $k);
$bplot->SetColor($colours[$series]);
if ($series == 0) {
$bplot->SetFillColor('lightred');
} else {
$bplot->SetFill(false);
}
$bplot->SetLineWeight(1 * $k);
$bplot->SetLegend($labels[$series]);
if ($bandw) {
$bplot->SetShadow("gray5");
}
$graph->Add($bplot);
}
} else {
if ($type == 'line') {
// Setup the graph.
$graph->img->SetMargin($pml * $k, $pmr * $k, $pmt * $k, $pmb * $k);
// LRTB
$graph->SetScale($axes);
$graph->yaxis->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
if ($ylabel) {
$graph->yaxis->title->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->yaxis->SetTitle($ylabel, 'middle');
$graph->yaxis->SetTitleMargin($yaxislblmargin * $k);
}
$graph->yaxis->SetLabelMargin(4 * $k);
if ($percent || $show_percent) {
$graph->yaxis->SetLabelFormat('%d%%');
}
// Percent
// Show 0 label on Y-axis (default is not to show)
$graph->yscale->ticks->SupressZeroLabel(true);
if ($hide_y_axis) {
$graph->yaxis->Hide();
}
if ($hide_grid) {
$graph->ygrid->Show(false);
}
// Setup X-axis labels
$graph->xaxis->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->xaxis->SetTickLabels($legends);
$graph->xaxis->SetLabelAngle($xlangle);
$graph->xaxis->SetLabelMargin(4 * $k);
// X-axis title
if ($xlabel) {
$graph->xaxis->title->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->xaxis->SetTitle($xlabel, 'middle');
$graph->xaxis->SetTitleMargin($xaxislblmargin * $k);
}
foreach ($data as $series => $rdata) {
$bplot = new LinePlot($rdata);
$bplot->mark->SetType($markers[$series]);
$bplot->mark->SetFillColor($colours[$series]);
$bplot->mark->SetWidth(4 * $k);
if ($show_values) {
$bplot->value->Show();
// Not if scatter
$bplot->value->SetMargin(6 * $k);
$bplot->value->SetColor("darkred");
$bplot->value->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
if ($percent || $show_percent) {
$bplot->value->SetFormat('%d%%');
} else {
$bplot->value->SetFormat("%s");
}
}
// Set color for each line
$bplot->SetColor($colours[$series]);
$bplot->SetWeight(2 * $k);
$bplot->SetLegend($labels[$series]);
if ($bandw) {
$bplot->SetShadow("gray5");
}
// Indent the X-scale so the first and last point doesn't fall on the edges
$bplot->SetCenter();
$graph->Add($bplot);
}
} else {
if ($type == 'xy' || $type == 'scatter') {
// Setup the graph.
$graph->img->SetMargin($pml * $k, $pmr * $k, $pmt * $k, $pmb * $k);
// LRTB
$graph->SetScale($axes);
// Setup font for axis
$graph->yaxis->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
// Y-axis title
if ($labels[1]) {
$graph->yaxis->title->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->yaxis->SetTitleMargin($yaxislblmargin * $k);
$graph->yaxis->SetTitle($labels[1], 'middle');
}
$graph->yaxis->SetLabelMargin(4 * $k);
if ($percent || $show_percent) {
$graph->yaxis->SetLabelFormat('%d%%');
}
// Percent
// Show 0 label on Y-axis (default is not to show)
$graph->yscale->ticks->SupressZeroLabel(true);
// Just let the maximum be autoscaled
$graph->yaxis->scale->SetAutoMin(0);
if ($hide_y_axis) {
$graph->yaxis->Hide();
}
if ($hide_grid) {
$graph->ygrid->Show(false);
}
// Setup X-axis labels
$graph->xaxis->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
// mPDF 2.5 Corrects labelling of x-axis
// $graph->xaxis->SetTickLabels($legends);
$graph->xaxis->SetLabelAngle(50);
$graph->xaxis->SetLabelMargin(4 * $k);
// X-axis title
if ($labels[0]) {
$graph->xaxis->title->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->xaxis->SetTitleMargin($xaxislblmargin * $k);
$graph->xaxis->SetTitle($labels[0], 'middle');
}
// Create the bar plot
// SPLINES
if ($splines && $type == 'xy') {
$spline = new Spline($data[0], $data[1]);
list($newx, $newy) = $spline->Get(100);
} else {
$newx = $data[0];
$newy = $data[1];
}
if ($type == 'xy') {
// LINE PLOT
$bplot = new LinePlot($newy, $newx);
// Set color for each line
$bplot->SetColor($fills[0]);
$bplot->SetWeight(4 * $k);
if ($bandw) {
$bplot->SetShadow("gray5");
}
$graph->Add($bplot);
}
// SCATTER PLOT
$cplot = new ScatterPlot($data[1], $data[0]);
$cplot->mark->SetType($markers[0]);
$cplot->mark->SetFillColor($fills[0]);
$cplot->mark->SetWidth(8 * $k);
if ($show_values) {
// mPDF 2.5
if ($type == 'xy') {
$cplot->value->Show();
}
// Not if scatter
$cplot->value->SetMargin(8 * $k);
$cplot->value->SetColor("darkred");
$cplot->value->SetFont(FF_USERFONT, FS_NORMAL, 6 * $k);
if ($percent || $show_percent) {
$cplot->value->SetFormat('%d%%');
} else {
$cplot->value->SetFormat("%s");
}
}
// Set color for each line
$cplot->SetColor($fills[0]);
$cplot->SetWeight(4 * $k);
if ($bandw) {
$cplot->SetShadow("gray5");
}
$graph->Add($cplot);
} else {
if ($type == 'bar') {
// Setup the graph.
$graph->img->SetMargin($pml * $k, $pmr * $k, $pmt * $k, $pmb * $k);
// LRTB
$graph->SetScale($axes);
// Setup y-axis
$graph->yaxis->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
if ($hide_y_axis) {
$graph->yaxis->Hide();
}
if ($hide_grid) {
$graph->ygrid->Show(false);
}
$graph->yaxis->SetLabelMargin(4 * $k);
if ($ylabel) {
$graph->yaxis->title->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->yaxis->SetTitle($ylabel, 'middle');
$graph->yaxis->SetTitleMargin($yaxislblmargin * $k);
}
// Show 0 label on Y-axis (default is not to show)
$graph->yscale->ticks->SupressZeroLabel(false);
// Setup X-axis labels
$graph->xaxis->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->xaxis->SetTickLabels($legends);
$graph->xaxis->SetLabelAngle($xlangle);
$graph->xaxis->SetLabelMargin(4 * $k);
// X-axis title
if ($xlabel) {
$graph->xaxis->title->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->xaxis->SetTitle($xlabel, 'middle');
$graph->xaxis->SetTitleMargin($xaxislblmargin * $k);
}
$group = array();
foreach ($data as $series => $dat) {
$rdata = array();
foreach ($data[$series] as $row) {
$rdata[] = $row;
}
// Create the bar plot
$bplot = new BarPlot($rdata);
$bplot->SetWidth(0.6);
// for SINGLE??
// Setup color for gradient fill style
if ($bandw) {
$bplot->SetPattern($patterns[$series]);
} else {
$bplot->SetFillGradient($fills[$series], "#EEEEEE", GRAD_LEFT_REFLECTION);
}
// Set color for the frame of each bar
$bplot->SetColor("darkgray");
$bplot->SetLegend($labels[$series]);
if ($bandw) {
$bplot->SetShadow("gray5");
}
if ($show_values) {
$bplot->value->Show();
$bplot->value->SetMargin(6 * $k);
$bplot->value->SetColor("darkred");
$bplot->value->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
if ($percent || $show_percent) {
$bplot->value->SetFormat('%d%%');
} else {
$bplot->value->SetFormat("%s");
}
}
$group[] = $bplot;
}
if (count($data) == 1) {
$graph->Add($group[0]);
} else {
// Create the grouped bar plot
if ($stacked) {
$gbplot = new AccBarPlot($group);
} else {
$gbplot = new GroupBarPlot($group);
}
$graph->Add($gbplot);
}
} else {
if ($type == 'horiz_bar') {
$graph->SetScale($axes);
$graph->Set90AndMargin($pml * $k, $pmr * $k, $pmt * $k, $pmb * $k);
// LRTB
// Setup y-axis
$graph->yaxis->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->yaxis->SetLabelMargin(4 * $k);
$graph->yaxis->SetPos('max');
// Intersect at top of x-axis i.e. y axis is at bottom
// First make the labels look right
$graph->yaxis->SetLabelAlign('center', 'top');
if ($percent || $show_percent) {
$graph->yaxis->SetLabelFormat('%d%%');
}
$graph->yaxis->SetLabelSide(SIDE_RIGHT);
$graph->yaxis->scale->SetGrace(10);
// sets 10% headroom
if ($hide_y_axis) {
$graph->yaxis->Hide();
}
if ($hide_grid) {
$graph->ygrid->Show(false);
}
// The fix the tick marks
$graph->yaxis->SetTickSide(SIDE_LEFT);
if ($ylabel) {
$graph->yaxis->title->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->yaxis->SetTitle($ylabel, 'middle');
$graph->yaxis->SetTitleMargin($yaxislblmargin * $k);
// Finally setup the title
$graph->yaxis->SetTitleSide(SIDE_RIGHT);
// To align the title to the right use :
$graph->yaxis->title->Align('right');
$graph->yaxis->title->SetAngle(0);
}
// Show 0 label on Y-axis (default is not to show)
$graph->yscale->ticks->SupressZeroLabel(false);
// Setup X-axis labels
$graph->xaxis->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->xaxis->title->SetAngle(90);
$graph->xaxis->SetTickLabels($legends);
$graph->xaxis->SetLabelMargin(4 * $k);
// X-axis title
if ($xlabel) {
$graph->xaxis->title->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
$graph->xaxis->SetTitleMargin($xaxislblmargin * $k);
$graph->xaxis->SetTitle($xlabel, 'middle');
}
$group = array();
foreach ($data as $series => $dat) {
$rdata = array();
foreach ($data[$series] as $row) {
$rdata[] = $row;
}
// Create the bar pot
$bplot = new BarPlot($rdata);
$bplot->SetWidth(0.6);
// for SINGLE??
// Setup color for gradient fill style
if ($bandw) {
$bplot->SetPattern($patterns[$series]);
} else {
$bplot->SetFillGradient($fills[$series], "#EEEEEE", GRAD_LEFT_REFLECTION);
}
// Set color for the frame of each bar
$bplot->SetColor("darkgray");
$bplot->SetLegend($labels[$series]);
if ($bandw) {
$bplot->SetShadow("gray5");
}
if ($show_values) {
$bplot->value->Show();
$bplot->value->SetMargin(6 * $k);
$bplot->value->SetColor("darkred");
$bplot->value->SetFont(FF_USERFONT, FS_NORMAL, 8 * $k);
if ($percent || $show_percent) {
$bplot->value->SetFormat('%d%%');
} else {
$bplot->value->SetFormat("%s");
}
}
$group[] = $bplot;
}
if (count($data) == 1) {
$graph->Add($group[0]);
} else {
// Create the grouped bar plot
if ($stacked) {
$gbplot = new AccBarPlot($group);
} else {
$gbplot = new GroupBarPlot($group);
}
$graph->Add($gbplot);
}
}
}
}
}
}
}
}
if ($graph) {
$graph->Stroke(_MPDF_PATH . $figure_file);
$srcpath = str_replace("\\", "/", dirname(__FILE__)) . "/";
$srcpath .= $figure_file;
return array('file' => $srcpath, 'w' => $w, 'h' => $h);
}
}
return false;
}
// 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();
<?php
require_once "../../ScatterPlot.class.php";
$graph = new Graph(300, 280);
$graph->title->set('Linked ScatterPlot');
$graph->title->setFont(new TuffyItalic(14));
$graph->shadow->setSize(4);
$y = array(1, 10, 7, 8, 5, 4, 2, 4);
$x = array(0.5, 0.5, 1.5, 4, 3, 5, 2, 2);
$plot = new ScatterPlot($y, $x);
$plot->setBackgroundColor(new Color(235, 235, 235));
$plot->mark->setSize(15);
$plot->mark->setFill(new RadialGradient(new LightGreen(), new DarkGreen()));
$plot->link(TRUE);
$plot->setColor(new DarkGreen());
$plot->setSpace(6, 6, 6, 0);
$plot->setPadding(25, NULL, 40, 20);
$graph->add($plot);
$graph->draw();
<?php
require_once "../../ScatterPlot.class.php";
$graph = new Graph(300, 200);
$graph->title->set('Impulses');
$graph->shadow->setSize(4);
$y = array();
for ($i = 0; $i < 40; $i++) {
$y[] = cos($i / 15 * 2 * M_PI) / (0.8 + $i / 15) * 4;
}
$plot = new ScatterPlot($y);
$plot->setPadding(25, 15, 35, 15);
$plot->setBackgroundColor(new Color(230, 230, 255));
$plot->setSpace(2, 2);
// Set impulses
$plot->setImpulse(new DarkBlue());
$plot->grid->hideVertical();
$plot->grid->setType(LINE_DASHED);
// Hide ticks
$plot->xAxis->hideTicks();
$plot->xAxis->label->hide();
$plot->mark->setType(MARK_SQUARE);
$plot->mark->setSize(4);
$graph->add($plot);
$graph->draw();
<?php
// content="text/plain; charset=utf-8"
require_once 'jpgraph/jpgraph.php';
require_once 'jpgraph/jpgraph_scatter.php';
$datax = array(3.5, 3.7, 3, 4, 6.2, 6, 3.5, 8, 14, 8, 11.1, 13.7);
$datay = array(20, 22, 12, 13, 17, 20, 16, 19, 30, 31, 40, 43);
$graph = new Graph(300, 200);
$graph->img->SetMargin(40, 40, 40, 40);
$graph->img->SetAntiAliasing();
$graph->SetScale("linlin");
$graph->SetShadow();
$graph->title->Set("Linked Scatter plot ex1");
$graph->title->SetFont(FF_FONT1, FS_BOLD);
$sp1 = new ScatterPlot($datay, $datax);
$sp1->SetLinkPoints(true, "red", 2);
$sp1->mark->SetType(MARK_FILLEDCIRCLE);
$sp1->mark->SetFillColor("navy");
$sp1->mark->SetWidth(3);
$graph->Add($sp1);
$graph->Stroke();
?>
<?php
include_once "../jpgraph.php";
include_once "../jpgraph_scatter.php";
// Some data for the points
$datax = array(3.5, 13.7, 3, 4, 6.2, 6, 3.5, 8, 14, 8, 11.1, 13.7);
$datay = array(10, 22, 12, 13, 17, 20, 16, 19, 30, 31, 40, 43);
// A new scatter graph
$graph = new Graph(300, 200, 'auto');
$graph->SetShadow();
$graph->SetScale("linlin");
//$graph->img->SetMargin(40,40,40,40);
$graph->title->Set("Scatter plot with Image Map");
$graph->title->SetFont(FF_FONT1, FS_BOLD);
// Client side image map targets
$targ = array("pie_csimex1.php#1", "pie_csimex1.php#2", "pie_csimex1.php#3", "pie_csimex1.php#4", "pie_csimex1.php#5", "pie_csimex1.php#6", "pie_csimex1.php#7", "pie_csimex1.php#8", "pie_csimex1.php#9");
// Strings to put as "alts" (and "title" value)
$alts = array("val=%d", "val=%d", "val=%d", "val=%d", "val=%d", "val=%d", "val=%d", "val=%d", "val=%d");
// Create a new scatter plot
$sp1 = new ScatterPlot($datay, $datax);
// Use diamonds as markerss
$sp1->mark->SetType(MARK_DIAMOND);
$sp1->mark->SetWidth(10);
// Set the scatter plot image map targets
$sp1->SetCSIMTargets($targ, $alts);
// Add the plot
$graph->Add($sp1);
// Send back the HTML page which will call this script again
// to retrieve the image.
$graph->StrokeCSIM('scatter_csimex1.php');
$graph->ynaxis[1]->title->SetFont(FF_FONT1, FS_BOLD, 12);
$graph->ynaxis[1]->SetTitleMargin(45);
$graph->ynaxis[1]->SetColor("black", "black");
$graph->ynaxis[1]->SetLabelFormat('%0.3f');
$graph->legend->SetLayout(LEGEND_HOR);
$graph->legend->Pos(0.01, 0.05);
$graph->legend->SetFont(FF_FONT1, FS_BOLD, 14);
// Create the linear plot
$lineplot = new LinePlot($mph, $times);
$lineplot->SetLegend("Instant Wind Speed");
$lineplot->SetColor("red");
$lineplot2 = new LinePlot($alti, $times);
$lineplot2->SetLegend("Pressure");
$lineplot2->SetColor("black");
//if ($hasgust == 1){
// Create the linear plot
// $lp1=new LinePlot($gust);
// $lp1->SetLegend("Peak Wind Gust");
// $lp1->SetColor("black");
//}
// Create the linear plot
$sp1 = new ScatterPlot($drct, $times);
$sp1->mark->SetType(MARK_FILLEDCIRCLE);
$sp1->mark->SetFillColor("blue");
$sp1->mark->SetWidth(3);
$sp1->SetLegend("Wind Direction");
$graph->Add($sp1);
$graph->AddY(0, $lineplot);
$graph->AddY(1, $lineplot2);
//$graph->AddY2($lp1);
$graph->Stroke();
$datay2[$x] = number_format($bar->ffapk, 2, '.', ',');
}
}
//===========
$graph = new Graph(750, 450);
$graph->img->SetMargin(40, 40, 40, 80);
$graph->img->SetAntiAliasing();
$graph->SetScale("textlin");
$graph->SetShadow();
$graph->title->Set(strtoupper($pabrik) . " FFA " . $periode);
$graph->title->SetFont(FF_DEFAULT, FS_NORMAL, 14);
$graph->xaxis->SetFont(FF_DEFAULT, FS_NORMAL, 11);
$graph->xaxis->SetTickLabels($labels);
$graph->xaxis->SetLabelAngle(45);
$p1 = new ScatterPlot($datay1);
$p2 = new ScatterPlot($datay2);
$p1->SetLegend('CPO');
$p2->SetLegend('Kernel');
$graph->legend->Pos(0.02, 0.03);
$p1->mark->SetType(MARK_SQUARE);
$p1->SetImpuls();
$p1->mark->SetFillColor("red");
$p1->mark->SetWidth(4);
$p1->SetColor("blue");
$p2->mark->SetType(MARK_FILLEDCIRCLE);
$p2->SetImpuls();
$p2->mark->SetFillColor("orange");
$p2->mark->SetWidth(4);
$p2->SetColor("black");
$p1->SetCenter();
$graph->Add(array($p1, $p2));
// content="text/plain; charset=utf-8"
require_once 'jpgraph/jpgraph.php';
require_once 'jpgraph/jpgraph_scatter.php';
// Make a circle with a scatterplot
$steps = 16;
for ($i = 0; $i < $steps; ++$i) {
$a = 2 * M_PI / $steps * $i;
$datax[$i] = cos($a);
$datay[$i] = sin($a);
}
$graph = new Graph\Graph(350, 230);
$graph->SetScale('linlin');
$graph->SetShadow();
$graph->SetAxisStyle(AXSTYLE_BOXOUT);
$graph->img->SetMargin(50, 50, 60, 40);
$graph->title->Set('Linked scatter plot');
$graph->title->SetFont(FF_FONT1, FS_BOLD);
$graph->subtitle->Set('(BOXOUT Axis style)');
$graph->subtitle->SetFont(FF_FONT1, FS_NORMAL);
// 10% top and bottom grace
$graph->yscale->SetGrace(5, 5);
$graph->xscale->SetGrace(1, 1);
$sp1 = new ScatterPlot($datay, $datax);
$sp1->mark->SetType(MARK_FILLEDCIRCLE);
$sp1->mark->SetFillColor('red');
$sp1->SetColor('blue');
$sp1->mark->SetWidth(4);
$sp1->link->Show();
$sp1->link->SetStyle('dotted');
$graph->Add($sp1);
$graph->Stroke();
}
$plot = new LinePlot($data_new);
$plot->label->set($data_label);
$plot->label->move(5, -7);
$plot->setColor(new Color(255, 165, 0));
$plot->setFillColor(new LightOrange(80));
$group->add($plot);
}
$graph->add($group);
} else {
if ($type == "scatter") {
require INCLUDE_PATH . "/ScatterPlot.class.php";
$graph = new Graph($width, $height);
$graph->title->set($title);
$graph->title->setFont(new Tuffy(11));
$plot = new ScatterPlot($data, $keys);
$plot->grid->setType(LINE_DASHED);
$plot->grid->hideVertical(TRUE);
$plot->setSpace(6, 6, 6, 0);
$plot->setPadding(25, 15, 27, 20);
$graph->add($plot);
}
}
}
}
$graph->draw(str_replace("\\", "/", realpath($cache_dir)) . "/" . $cid);
if ($cache_dir == "cache/") {
header("Location: " . $cache_dir . $cid);
} else {
header("Content-Type: image/png; charset=utf-8");
readfile($cache_dir . $cid);
{
return sprintf("%02.2f", $l);
}
// Setup the basic parameters for the graph
$graph = new Graph(400, 200);
$graph->SetScale("intlin");
$graph->SetShadow();
$graph->SetBox();
$graph->title->Set("Impuls Example 3");
$graph->title->SetFont(FF_FONT1, FS_BOLD);
// Set format callback for labels
$graph->yaxis->SetLabelFormatCallback("mycallback");
// 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);
// Create a new impuls type scatter plot
$sp1 = new ScatterPlot($datay);
$sp1->mark->SetType(MARK_SQUARE);
$sp1->mark->SetFillColor("red");
$sp1->SetImpuls();
$sp1->SetColor("blue");
$sp1->SetWeight(1);
$sp1->mark->SetWidth(3);
$graph->Add($sp1);
$graph->Stroke();
$graph->title->SetFont(FF_FONT1, FS_BOLD, 12);
$graph->yaxis->SetTitle("Wind Direction [Deg]");
$graph->yaxis->title->SetFont(FF_FONT1, FS_BOLD, 12);
$graph->xaxis->SetTitle("Local Valid Time");
$graph->y2axis->SetTitle("Wind Speed [knots]");
$graph->y2axis->title->SetFont(FF_FONT1, FS_BOLD, 12);
$graph->y2axis->SetTitleMargin(35);
$graph->xaxis->SetTitleMargin(55);
$graph->xaxis->title->SetFont(FF_FONT1, FS_BOLD, 12);
if ($i > 72) {
$graph->xaxis->SetTextTickInterval(6);
}
//$graph->y2axis->SetColor("blue");
$graph->yaxis->SetColor("blue");
// Create the linear plot
$sp1 = new ScatterPlot($ydata1);
$sp1->mark->SetType(MARK_FILLEDCIRCLE);
$sp1->mark->SetFillColor("blue");
$sp1->mark->SetWidth(3);
$sp1->SetLegend("Wind Dir");
// Create the linear plot
$lineplot1 = new LinePlot($ydata2);
$lineplot1->SetColor("black");
$lineplot1->SetLegend("Wind Speed");
$graph->legend->SetLayout(LEGEND_HOR);
$graph->legend->Pos(0.1, 0.06, "right", "top");
// Add the plot to the graph
$graph->Add($sp1);
$graph->AddY2($lineplot1);
// Display the graph
$graph->Stroke();
