From b3c4f9427fd64274230ed4fbc6068e5ecb82e4db Mon Sep 17 00:00:00 2001
From: Marco Ratto <marco.ratto@jrc.ec.europa.eu>
Date: Tue, 10 Dec 2013 11:22:15 +0100
Subject: [PATCH] Fixed bad representation of identification patterns for
 moment information matrix (and also fixed figure title)

---
 matlab/plot_identification.m | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/matlab/plot_identification.m b/matlab/plot_identification.m
index 278133ce7..38e7c976f 100644
--- a/matlab/plot_identification.m
+++ b/matlab/plot_identification.m
@@ -153,9 +153,9 @@ if SampleSize == 1,
             dyn_saveas(hh,[ IdentifDirectoryName '/' M_.fname '_ident_collinearity_' tittxt1 '_' int2str(j) ],options_);
         end
         skipline()
+        [U,S,V]=svd(idehess.AHess,0);
+        S=diag(S);
         if idehess.flag_score,
-            [U,S,V]=svd(idehess.AHess,0);
-            S=diag(S);
             if nparam<5,
                 f1 = dyn_figure(options_,'Name',[tittxt,' - Identification patterns (Information matrix)']);
             else
@@ -163,13 +163,13 @@ if SampleSize == 1,
                 f2 = dyn_figure(options_,'Name',[tittxt,' - Identification patterns (Information matrix): HIGHEST SV']);
             end
         else
-            S = idemoments.S;
-            V = idemoments.V;
+%             S = idemoments.S;
+%             V = idemoments.V;
             if nparam<5,
-                f1 = dyn_figure(options_,'Name',[tittxt,' - Identification patterns (moments)']);
+                f1 = dyn_figure(options_,'Name',[tittxt,' - Identification patterns (moments Information matrix)']);
             else
-                f1 = dyn_figure(options_,'Name',[tittxt,' - Identification patterns (moments): SMALLEST SV']);
-                f2 = dyn_figure(options_,'Name',[tittxt,' - Identification patterns (moments): HIGHEST SV']);
+                f1 = dyn_figure(options_,'Name',[tittxt,' - Identification patterns (moments Information matrix): SMALLEST SV']);
+                f2 = dyn_figure(options_,'Name',[tittxt,' - Identification patterns (moments Information matrix): HIGHEST SV']);
             end
         end
         for j=1:min(nparam,8),
-- 
GitLab