header("Content-type: image/png"); // Copyright (c) Isaac Gouy 2004-2014 // LIBRARIES //////////////////////////////////////////////// require_once LIB_PATH . 'lib_whitelist.php'; require_once LIB_PATH . 'lib_chart.php'; SetChartCacheControl(); $in = WhiteListIn(); $WhiteListTests = WhiteListUnique('test.csv', $in); $WhiteListLangs = WhiteListUnique('lang.csv', $in); // DATA //////////////////////////////////////////////////// list($Mark, $valid) = ValidMark(TRUE); list($Sort, $valid) = ValidSort($valid); list($Test, $valid) = ValidTests($WhiteListTests, $valid); list($BackText, $valid) = ValidLangs($WhiteListLangs, $valid); list($Ratios, $valid) = ValidMatrix('r', 1, $valid); for ($i = 0; $i < sizeof($Ratios); $i++) { $Ratios[$i] = log10($Ratios[$i]); } // CHART ////////////////////////////////////////////////// $chart = new WideBarChart(); $chart->yAxis(log10axis(axis1000())); if ($valid) { $chart->backgroundText($BackText); $chart->bars($Ratios); $chart->notice($Mark); $chart->xAxisLegend('selected ' . $Test[0] . ' programs'); if ($Sort == 'fullcpu') { $titletext = $Test[0] . ' - How many times slower? (CPU secs)'; $yaxistext = 'program time ÷ fastest program time'; } elseif ($Sort == 'kb') {
header("Content-type: image/png"); // Copyright (c) Isaac Gouy 2009-2011 // LIBRARIES //////////////////////////////////////////////// require_once LIB_PATH . 'lib_whitelist.php'; require_once LIB_PATH . 'lib_chart.php'; SetChartCacheControl(); $in = WhiteListIn(); $WhiteListLangs = WhiteListUnique('lang.csv', $in); // DATA //////////////////////////////////////////////////// list($LangName, $valid) = ValidLangs($WhiteListLangs, TRUE); list($Shapes, $valid) = ValidMatrix('s', 1, $valid); for ($i = 0; $i < sizeof($Shapes); $i++) { $Shapes[$i] = log10($Shapes[$i]); } list($Centers, $valid) = ValidMatrix('c', 1, $valid); for ($i = 0; $i < sizeof($Centers); $i++) { $Centers[$i] = log10($Centers[$i]); } // CHART ////////////////////////////////////////////////// $w = 150; $h = 120; $xo = 48; $yo = MARGIN; $chart = new ShapeChart(); if ($valid) { $chart->yAxis(log10axis(axis3_5_10())); $chart->xAxis(log10axis(axisOneTen()), 101.0); $chart->frame(); $chart->title_($LangName[0], 2, CHAR_WIDTH_2); // hard-code a shortest programs example
header("Content-type: image/png"); // Copyright (c) Isaac Gouy 2004-2011 // LIBRARIES //////////////////////////////////////////////// require_once LIB_PATH . 'lib_whitelist.php'; require_once LIB_PATH . 'lib_chart.php'; SetChartCacheControl(); $in = WhiteListIn(); $WhiteListTests = WhiteListUnique('test.csv', $in); $WhiteListLangs = WhiteListUnique('lang.csv', $in); // DATA //////////////////////////////////////////////////// list($Mark, $valid) = ValidMark($HTTP_GET_VARS, TRUE); list($Sort, $valid) = ValidSort($HTTP_GET_VARS, $valid); list($Test, $valid) = ValidTests($HTTP_GET_VARS, $WhiteListTests, $valid); list($BackText, $valid) = ValidLangs($HTTP_GET_VARS, $WhiteListLangs, $valid); list($Ratios, $valid) = ValidMatrix($HTTP_GET_VARS, 'r', 1, $valid); for ($i = 0; $i < sizeof($Ratios); $i++) { $Ratios[$i] = log10($Ratios[$i]); } // CHART ////////////////////////////////////////////////// $chart = new WideBarChart(); $chart->yAxis(log10axis(axis1000())); if ($valid) { $chart->backgroundText($BackText); $chart->bars($Ratios); $chart->notice($Mark); $chart->xAxisLegend('selected ' . $Test[0] . ' programs'); if ($Sort == 'fullcpu') { $titletext = $Test[0] . ' - How many times slower? (CPU secs)'; $yaxistext = 'program time ÷ fastest program time'; } elseif ($Sort == 'kb') {
SetChartCacheControl(); $in = WhiteListIn(); $WhiteListLangs = WhiteListUnique('lang.csv', $in); // DATA LAYOUT /////////////////////////////////////////////////// define('STATS_SIZE', 8); define('STAT_MIN', 0); define('STAT_XLOWER', 1); define('STAT_LOWER', 2); define('STAT_MEDIAN', 3); define('STAT_UPPER', 4); define('STAT_XUPPER', 5); define('STAT_MAX', 6); define('STATS_N', 7); // DATA //////////////////////////////////////////////////// list($Mark, $valid) = ValidMark(TRUE); list($BackText, $valid) = ValidLangs($WhiteListLangs, $valid); list($Stats, $valid) = ValidMatrix('s', STATS_SIZE, $valid); //for ($i=0;$i<sizeof($Stats);$i++) $Stats[$i] = log10($Stats[$i]); // CHART ///////////////////////////////////////////////////// $chart = new BoxChart(); $chart->yAxis(axis10()); if ($valid) { $chart->backgroundText($BackText); $chart->boxAndWhiskers($Stats); $chart->notice($Mark); } $chart->xAxisLegend('selected language implementations'); $chart->yAxisLegend('program time ÷ fastest program time'); $chart->title('Ten tiny examples - How many times slower?'); $chart->frame(); $chart->complete();
header("Content-type: image/png"); // Copyright (c) Isaac Gouy 2004-2011 // LIBRARIES //////////////////////////////////////////////// require_once LIB_PATH . 'lib_whitelist.php'; require_once LIB_PATH . 'lib_chart.php'; SetChartCacheControl(); $in = WhiteListIn(); $WhiteListLangs = WhiteListUnique('lang.csv', $in); // DATA //////////////////////////////////////////////////// list($Mark, $valid) = ValidMark(TRUE); list($LangName, $valid) = ValidLangs($WhiteListLangs, $valid); define('RATIOS_SIZE', 3); define('RATIOS_SECS', 0); define('RATIOS_KB', 1); define('RATIOS_GZ', 2); list($Matrix, $valid) = ValidMatrix('r', RATIOS_SIZE, $valid); $secs = array(); $kb = array(); $gz = array(); $n = sizeof($Matrix); if ($n % RATIOS_SIZE == 0) { for ($i = 0; $i < $n; $i += RATIOS_SIZE) { $secs[] = log10($Matrix[$i + RATIOS_SECS]); $kb[] = log10($Matrix[$i + RATIOS_KB]); $gz[] = log10($Matrix[$i + RATIOS_GZ]); } } unset($Matrix); sort($secs); sort($kb); sort($gz);
$in = WhiteListIn(); $WhiteListLangs = WhiteListUnique('lang.csv', $in); // DATA LAYOUT /////////////////////////////////////////////////// define('STATS_SIZE', 8); define('STAT_MIN', 0); define('STAT_XLOWER', 1); define('STAT_LOWER', 2); define('STAT_MEDIAN', 3); define('STAT_UPPER', 4); define('STAT_XUPPER', 5); define('STAT_MAX', 6); define('STATS_N', 7); // DATA //////////////////////////////////////////////////// list($Mark, $valid) = ValidMark($HTTP_GET_VARS, TRUE); list($BackText, $valid) = ValidLangs($HTTP_GET_VARS, $WhiteListLangs, $valid); list($Stats, $valid) = ValidMatrix($HTTP_GET_VARS, 's', STATS_SIZE, $valid); for ($i = 0; $i < sizeof($Stats); $i++) { $Stats[$i] = log10($Stats[$i]); } // CHART ///////////////////////////////////////////////////// $chart = new BoxChart(); $chart->yAxis(log10axis(axis3000())); if ($valid) { $chart->backgroundText($BackText); $chart->boxAndWhiskers($Stats); $chart->notice($Mark); } $chart->xAxisLegend('selected language implementations'); $chart->yAxisLegend('program time ÷ fastest program time'); $chart->title('Ten tiny tasks - How many times slower?'); $chart->frame();
<?php header("Content-type: image/png"); // Copyright (c) Isaac Gouy 2004-2011 // LIBRARIES //////////////////////////////////////////////// require_once LIB_PATH . 'lib_whitelist.php'; require_once LIB_PATH . 'lib_chart.php'; SetChartCacheControl(); $in = WhiteListIn(); $WhiteListLangs = WhiteListUnique('lang.csv', $in); // DATA //////////////////////////////////////////////////// list($Mark, $valid) = ValidMark($HTTP_GET_VARS, TRUE); list($BackText, $valid) = ValidLangs($HTTP_GET_VARS, $WhiteListLangs, $valid); list($Values, $valid) = ValidMatrix($HTTP_GET_VARS, 'g', 1, $valid); //for ($i=0;$i<sizeof($Values);$i++) $Values[$i] = log10($Values[$i]); // CHART ///////////////////////////////////////////////////// $chart = new WideBarChart(); $chart->yAxis(axis10()); if ($valid) { $chart->backgroundText($BackText); $chart->bars($Values); $chart->notice($Mark); } $chart->xAxisLegend('selected language implementations'); $chart->yAxisLegend('Weighted Geometric Mean - lowest is best'); $chart->title('Ten tiny tasks - How many times better?'); $chart->frame(); $chart->complete();
header("Content-type: image/png"); // Copyright (c) Isaac Gouy 2004-2009 // LIBRARIES //////////////////////////////////////////////// require_once LIB_PATH . 'lib_whitelist.php'; require_once LIB_PATH . 'lib_chart.php'; SetChartCacheControl(); $in = WhiteListIn(); $WhiteListLangs = WhiteListUnique('lang.csv', $in); // DATA //////////////////////////////////////////////////// list($Mark, $valid) = ValidMark($HTTP_GET_VARS, TRUE); list($LangName, $valid) = ValidLangs($HTTP_GET_VARS, $WhiteListLangs, $valid); define('RATIOS_SIZE', 3); define('RATIOS_SECS', 0); define('RATIOS_KB', 1); define('RATIOS_GZ', 2); list($Matrix, $valid) = ValidMatrix($HTTP_GET_VARS, 'r', RATIOS_SIZE, $valid); $secs = array(); $kb = array(); $gz = array(); $n = sizeof($Matrix); if ($n % RATIOS_SIZE == 0) { for ($i = 0; $i < $n; $i += RATIOS_SIZE) { $secs[] = log10($Matrix[$i + RATIOS_SECS]); $kb[] = log10($Matrix[$i + RATIOS_KB]); $gz[] = log10($Matrix[$i + RATIOS_GZ]); } } unset($Matrix); sort($secs); sort($kb); sort($gz);
<?php header("Content-type: image/png"); // Copyright (c) Isaac Gouy 2004-2012 // LIBRARIES //////////////////////////////////////////////// require_once LIB_PATH . 'lib_whitelist.php'; require_once LIB_PATH . 'lib_chart.php'; SetChartCacheControl(); $in = WhiteListIn(); $WhiteListLangs = WhiteListUnique('lang.csv', $in); // DATA //////////////////////////////////////////////////// list($Mark, $valid) = ValidMark(TRUE); list($BackText, $valid) = ValidLangs($WhiteListLangs, $valid); list($Values, $valid) = ValidMatrix('g', 1, $valid); //for ($i=0;$i<sizeof($Values);$i++) $Values[$i] = log10($Values[$i]); // CHART ///////////////////////////////////////////////////// $chart = new WideBarChart(); $chart->yAxis(axis10()); if ($valid) { $chart->backgroundText($BackText); $chart->bars($Values); $chart->notice($Mark); } $chart->xAxisLegend('selected language implementations'); $chart->yAxisLegend('Weighted Geometric Mean - smaller is better'); $chart->title('Ten tiny examples - How many times more time/memory/code used?'); $chart->frame(); $chart->complete();
require_once(LIB_PATH.'lib_chart.php'); SetChartCacheControl(); $in = WhiteListIn(); $WhiteListLangs = WhiteListUnique('lang.csv',$in); // DATA //////////////////////////////////////////////////// list ($LangName,$valid) = ValidLangs($HTTP_GET_VARS,$WhiteListLangs,TRUE); list ($Shapes,$valid) = ValidMatrix($HTTP_GET_VARS,'s',1,valid); for ($i=0;$i<sizeof($Shapes);$i++) $Shapes[$i] = log10($Shapes[$i]); list ($Centers,$valid) = ValidMatrix($HTTP_GET_VARS,'c',1,$valid); for ($i=0;$i<sizeof($Centers);$i++) $Centers[$i] = log10($Centers[$i]); // CHART ////////////////////////////////////////////////// $w = 150; $h = 120; $xo = 48; $yo = MARGIN; $chart = new ShapeChart(); if ($valid){