[Octave-cvsupdate] SF.net SVN: octave:[11022] trunk/octave-forge/main/control/inst/sigma.m

[<par...@us...>]

Revision: 11022
          http://octave.svn.sourceforge.net/octave/?rev=11022&view=rev
Author:   paramaniac
Date:     2012-09-14 19:32:33 +0000 (Fri, 14 Sep 2012)
Log Message:
-----------
control: finish sigma (completely :-)

Modified Paths:
--------------
    trunk/octave-forge/main/control/inst/sigma.m

Modified: trunk/octave-forge/main/control/inst/sigma.m
===================================================================
--- trunk/octave-forge/main/control/inst/sigma.m	2012-09-14 19:23:03 UTC (rev 11021)
+++ trunk/octave-forge/main/control/inst/sigma.m	2012-09-14 19:32:33 UTC (rev 11022)
@@ -105,18 +105,19 @@
       legend_args{k} = inputname(sys_idx(k));  # watch out for sigma (lticell{:})
     endfor
 
-    ## FIXME: legend color is mostly blue if the first system is MIMO
-    ##        maybe we can plot each line of sv individually
+    ## adjust line colors in legend  
+    idx = horzcat (1, cellfun (@rows, sv_db)(1:end-1));
+    idx = cumsum (idx);
 
     ## plot results
-    semilogx (plot_args{:})
+    h = semilogx (plot_args{:});
     axis ("tight")
     ylim (__axis_margin__ (ylim))
     grid ("on")
     title ("Singular Values")
     xlabel ("Frequency [rad/s]")
     ylabel ("Singular Values [dB]")
-    legend (legend_args)
+    legend (h(idx), legend_args)
   else            # return values
     sv_r = sv{1};
     w_r = reshape (w{1}, [], 1);

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