[rkward-cvs] SF.net SVN: rkward: [1207] trunk/rkward/rkward/plugins/plots/barplot.php

nono_231 at users.sourceforge.net nono_231 at users.sourceforge.net
Wed Jan 24 15:47:48 UTC 2007


Revision: 1207
          http://svn.sourceforge.net/rkward/?rev=1207&view=rev
Author:   nono_231
Date:     2007-01-24 07:47:47 -0800 (Wed, 24 Jan 2007)

Log Message:
-----------
syntax formatting changes

Modified Paths:
--------------
    trunk/rkward/rkward/plugins/plots/barplot.php

Modified: trunk/rkward/rkward/plugins/plots/barplot.php
===================================================================
--- trunk/rkward/rkward/plugins/plots/barplot.php	2007-01-24 15:37:52 UTC (rev 1206)
+++ trunk/rkward/rkward/plugins/plots/barplot.php	2007-01-24 15:47:47 UTC (rev 1207)
@@ -23,12 +23,12 @@
 		}
 		else {
 		rk.temp.barplot <- barplot((rk.temp.x), beside=<? getRK ("beside"); ?>, legend.text=<? getRK ("legend"); ?>,  ylim = range(rk.temp.x) * c(0, 1.2))
+		}
+		if(<? getRK ("labels"); ?>) text(rk.temp.barplot, rk.temp.x, labels=rk.temp.x, pos=<? getRK ("place"); ?>, offset=.5)
 	}
-	if(<? getRK ("labels"); ?>) text(rk.temp.barplot, rk.temp.x, labels=rk.temp.x, pos=<? getRK ("place"); ?>, offset=.5)
-	}
 	else {
-	if(<? getRK ("rainbow"); ?>) barplot((rk.temp.x), col=rainbow(rk.temp.x), legend.text=<? getRK ("legend"); ?>)
-	else barplot((rk.temp.x), legend.text=<? getRK ("legend"); ?>)
+		if(<? getRK ("rainbow"); ?>) barplot((rk.temp.x), col=rainbow(rk.temp.x), legend.text=<? getRK ("legend"); ?>)
+		else barplot((rk.temp.x), legend.text=<? getRK ("legend"); ?>)
 	}
 })
 rk.graph.off ()


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




More information about the rkward-tracker mailing list