Initial Commit of AgileBill Open Source
This commit is contained in:
78
includes/pear/Image/tests/plot/impulse.php
Normal file
78
includes/pear/Image/tests/plot/impulse.php
Normal file
@@ -0,0 +1,78 @@
|
||||
<?php
|
||||
|
||||
/* vim: set expandtab tabstop=4 shiftwidth=4 softtabstop=4: */
|
||||
|
||||
/**
|
||||
* This is a visual test case, testing the a set of impulse plots.
|
||||
*
|
||||
* Test cases:
|
||||
*
|
||||
* 1,1: A "normal" simple plot test
|
||||
*
|
||||
* 1,2: A plot crossing the x-axis (both positive and negative y-values)
|
||||
*
|
||||
* 2,1: A plot with all positive non-zero values
|
||||
*
|
||||
* 2,2: A plot with all negative non-zero values
|
||||
*
|
||||
* PHP versions 4 and 5
|
||||
*
|
||||
* LICENSE: This library is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU Lesser General Public License as published by
|
||||
* the Free Software Foundation; either version 2.1 of the License, or (at your
|
||||
* option) any later version. This library is distributed in the hope that it
|
||||
* will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty
|
||||
* of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser
|
||||
* General Public License for more details. You should have received a copy of
|
||||
* the GNU Lesser General Public License along with this library; if not, write
|
||||
* to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
|
||||
* 02111-1307 USA
|
||||
*
|
||||
* @category Images
|
||||
* @package Image_Graph
|
||||
* @subpackage Tests
|
||||
* @author Jesper Veggerby <pear.nosey@veggerby.dk>
|
||||
* @copyright Copyright (C) 2003, 2004 Jesper Veggerby Hansen
|
||||
* @license http://www.gnu.org/copyleft/lesser.html LGPL License 2.1
|
||||
* @version CVS: $Id: impulse.php,v 1.5 2005/08/03 21:21:58 nosey Exp $
|
||||
* @link http://pear.php.net/package/Image_Graph
|
||||
*/
|
||||
|
||||
require_once 'Image/Graph.php';
|
||||
|
||||
// create the graph
|
||||
$Graph =& Image_Graph::factory('graph', array(600, 400));
|
||||
// add a TrueType font
|
||||
$Font =& $Graph->addNew('ttf_font', 'Verdana');
|
||||
// set the font size to 11 pixels
|
||||
$Font->setSize(7);
|
||||
|
||||
$Graph->setFont($Font);
|
||||
|
||||
// create the plotarea
|
||||
$Graph->add(
|
||||
Image_Graph::vertical(
|
||||
Image_Graph::factory('title', array('Testing Area Plots', 10)),
|
||||
$Matrix = Image_Graph::factory('Image_Graph_Layout_Matrix', array(2, 2)),
|
||||
5
|
||||
)
|
||||
);
|
||||
|
||||
$DS[0][0] =& Image_Graph::factory('dataset', array(array('A' => 1, 'B' => 2, 'C' => 0, 'D' => 4, 'E' => 3)));
|
||||
$DS[0][1] =& Image_Graph::factory('dataset', array(array('A' => 1, 'B' => -2, 'C' => 1, 'D' => 3, 'E' => -1)));
|
||||
$DS[1][0] =& Image_Graph::factory('dataset', array(array('A' => 2, 'B' => 3, 'C' => 1, 'D' => 4, 'E' => 2)));
|
||||
$DS[1][1] =& Image_Graph::factory('dataset', array(array('A' => -1, 'B' => -3, 'C' => -2, 'D' => -4, 'E' => -1)));
|
||||
|
||||
for ($row = 0; $row < 2; $row++) {
|
||||
for ($col = 0; $col < 2; $col++) {
|
||||
if (isset($DS[$row][$col])) {
|
||||
$Plotarea =& $Matrix->getEntry($row, $col);
|
||||
|
||||
$Plot =& $Plotarea->addNew('impulse', $DS[$row][$col]);
|
||||
$Plot->setLineColor('red');
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
$Graph->done();
|
||||
?>
|
Reference in New Issue
Block a user