~l3on/ubuntu/precise/rkward/rebuild1

« back to all changes in this revision

Viewing changes to rkward/plugins/plots/box_plot.php

  • Committer: Bazaar Package Importer
  • Author(s): Thomas Friedrichsmeier
  • Date: 2008-04-20 21:30:00 UTC
  • mfrom: (1.2.2 upstream) (3.1.9 hardy)
  • Revision ID: james.westby@ubuntu.com-20080420213000-fs4i8efmfc793bnn
new upstream release
closes: #475175
closes: #463348
closes: #475982

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
1
<?
2
 
        function preprocess () {
3
 
        }
4
 
        
5
 
        function calculate () {
6
 
        }
7
 
        
8
 
        function printout () {
 
2
function preprocess () {
 
3
}
 
4
 
 
5
function calculate () {
 
6
}
 
7
 
 
8
function preview () {
 
9
        preprocess ();
 
10
        calculate ();
 
11
        doPrintout (false);
 
12
}
 
13
 
 
14
function printout () {
 
15
        doPrintout (true);
 
16
}
 
17
 
 
18
function doPrintout ($final) {
9
19
        $xvarsstring = join (", ", split ("\n", getRK_val ("x")));
 
20
 
 
21
        if ($final) {
10
22
?>
11
 
rk.header ("Boxplot", list ("Variable(s)", rk.get.description (<?echo ($xvarsstring); ?>, paste.sep=", ")))
 
23
rk.header ("Boxplot", list ("Variable(s)", rk.get.description (<? echo ($xvarsstring); ?>, paste.sep=", ")))
12
24
rk.graph.on()
13
 
boxplot (list (<? echo ($xvarsstring); ?>), notch = <? getRK ("notch") ?>, outline = <? getRK("outline")?>, horizontal = <? getRK("orientation") ?><? getRK ("plotoptions.code.printout"); ?>)
 
25
<?      } ?>
 
26
try (boxplot (list (<? echo ($xvarsstring); ?>), notch = <? getRK ("notch") ?>, outline = <? getRK("outline")?>, horizontal = <? getRK("orientation") ?><? getRK ("plotoptions.code.printout"); ?>))
 
27
<?      if ($final) { ?>
14
28
rk.graph.off ()
15
 
<?
16
 
        }
17
 
        
18
 
        function cleanup () {
19
 
        }
 
29
<?      }
 
30
}
20
31
?>