stepan
/
dynare
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Condition use of eig to compute left eigenvector on Matlab version 

Functionality is only supported in Matlab from 2014a/8.3 onwards. Closes #1266
time-shift
Johannes Pfeifer 2016-08-20 20:43:20 +02:00
parent 688c812267
commit 72e84657a7
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
matlab/identification_analysis.m
View File

@ -194,7 +194,14 @@ if info(1)==0,
% [V,D,W]=eig(cmm);
sd=sqrt(diag(cmm));
cc=cmm./(sd*sd');
[V,D,W]=eig(cc);
if isoctave && octave_ver_less_than('8.3')
[V,D]=eig(cc);
%fix for older Matlab versions that do not support computing left eigenvalues, see http://mathworks.com/help/releases/R2012b/matlab/ref/eig.html
[W,junk] = eig(cc.');
W = conj(W);
else
[V,D,W]=eig(cc);
end
id=find(diag(D)>1.e-8);
siTMP=siJ./repmat(sd,[1 nparam]);
MIM=(siTMP'*V(:,id))*(D(id,id)\(W(:,id)'*siTMP));