Fixed bad representation of identification patterns for moment information matrix (and also fixed figure title)

time-shift
Marco Ratto 2013-12-10 11:22:15 +01:00
parent 67d7ba75f0
commit b3c4f9427f
1 changed files with 7 additions and 7 deletions

View File

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