[rkward-cvs] SF.net SVN: rkward: [1950] trunk/rkward/rkward/plugins/plots

[sjar at users.sourceforge.net]

Revision: 1950
          http://rkward.svn.sourceforge.net/rkward/?rev=1950&view=rev
Author:   sjar
Date:     2007-08-07 16:32:01 -0700 (Tue, 07 Aug 2007)

Log Message:
-----------
density & angle added

Modified Paths:
--------------
    trunk/rkward/rkward/plugins/plots/piechart.php
    trunk/rkward/rkward/plugins/plots/piechart.rkh
    trunk/rkward/rkward/plugins/plots/piechart.xml

Modified: trunk/rkward/rkward/plugins/plots/piechart.php
===================================================================
--- trunk/rkward/rkward/plugins/plots/piechart.php	2007-08-07 20:04:28 UTC (rev 1949)
+++ trunk/rkward/rkward/plugins/plots/piechart.php	2007-08-07 23:32:01 UTC (rev 1950)
@@ -20,11 +20,15 @@
 	$names = getRK_val ("names");
 	$tabulate= getRK_val ("tabulate")=="TRUE";
 	$radius = getRK_val ("radius");
+	$angle = getRK_val ("angle");
+	$density = getRK_val ("density");
 	$col = getRK_val ("colors");
 	$clockwise = getRK_val ("clockwise");
 
 	$options = "";
 	$options .= ", clockwise =" . $clockwise;
+	$options .= ", density =" . $density;
+	$options .= ", angle =" . $angle;
 	if ($radius != 0.8) $options .= ", radius=" . $radius;
 	if ($col == "rainbow") $options .= ", col=rainbow (if(is.matrix(x)) dim(x) else length(x))";
 	else if ($col == "grayscale") $options .= ", col=gray.colors (if(is.matrix(x)) dim(x) else length(x))";

Modified: trunk/rkward/rkward/plugins/plots/piechart.rkh
===================================================================
--- trunk/rkward/rkward/plugins/plots/piechart.rkh	2007-08-07 20:04:28 UTC (rev 1949)
+++ trunk/rkward/rkward/plugins/plots/piechart.rkh	2007-08-07 23:32:01 UTC (rev 1950)
@@ -17,6 +17,8 @@
 		<caption id="tab_options"/>
 		<setting id="colors">Type of colors to use.</setting>
 		<setting id="radius">Radius of the pie. For long labels it may be necessary to make the pie smaller than the default.</setting>
+		<setting id="angle">Slope of shading lines, given as an angle in degrees (counter-clockwise).</setting>
+		<setting id="density">Density of shading lines (lines per inch). The default value of NULL means no shading lines are drawn. Negative values also inhibit the drawing of shading lines.</setting>
 		<setting id="clockwise">Define if slices should be drawn clockwise or counter clockwise.</setting>
 		<setting id="plotoptions">Generic plot options. See <link href="rkward://component/plot_options"/>.</setting>	
 	</settings>

Modified: trunk/rkward/rkward/plugins/plots/piechart.xml
===================================================================
--- trunk/rkward/rkward/plugins/plots/piechart.xml	2007-08-07 20:04:28 UTC (rev 1949)
+++ trunk/rkward/rkward/plugins/plots/piechart.xml	2007-08-07 23:32:01 UTC (rev 1950)
@@ -30,6 +30,8 @@
 				</radio>
 				<checkbox id="clockwise" label="clockwise" value="TRUE" value_unchecked="FALSE" checked="false" />
 				<spinbox id="radius" type="real" min="0.01" max="1" initial="0.8" label="Radius"/>
+				<spinbox id="density" type="real" initial="NULL" label="density"/>
+				<spinbox id="angle" type="real" min="0" initial="45" max="360" label="angle"/>
 				<embed id="plotoptions" component="rkward::plot_options" as_button="true" label="Plot Options"/>
 			</tab>
 		</tabbook>


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.