Commit e9a017b3 authored by ratto's avatar ratto
Browse files

new disp_pcorr option

git-svn-id: https://www.dynare.org/svn/dynare/trunk@2982 ac1d8469-bf42-47a9-8791-bf33cf982152
parent 290ea0d2
function disp_identification(pdraws, idemodel, idemoments)
function disp_identification(pdraws, idemodel, idemoments, disp_pcorr)
% Copyright (C) 2008 Dynare Team
%
......@@ -19,6 +19,10 @@ function disp_identification(pdraws, idemodel, idemoments)
global bayestopt_
if nargin<4 | isempty(disp_pcorr),
disp_pcorr=0;
end
[SampleSize, npar] = size(pdraws);
jok = 0;
jokP = 0;
......@@ -83,6 +87,7 @@ dyntable('Multi collinearity in the model:',strvcat('param','min','mean','max'),
dyntable('Multi collinearity for moments in J:',strvcat('param','min','mean','max'), ...
strvcat(bayestopt_.name(kokJ)),[mminJ, mmeanJ, mmaxJ],10,10,6);
if disp_pcorr,
for j=1:length(kokP),
dyntable([bayestopt_.name{kokP(j)},' pairwise correlations in the model'],strvcat(' ','min','mean','max'), ...
strvcat(bayestopt_.name{jpM{j}}),[pminM{j}' pmeanM{j}' pmaxM{j}'],10,10,3);
......@@ -92,3 +97,4 @@ for j=1:length(kokPJ),
dyntable([bayestopt_.name{kokPJ(j)},' pairwise correlations in J moments'],strvcat(' ','min','mean','max'), ...
strvcat(bayestopt_.name{jpJ{j}}),[pminJ{j}' pmeanJ{j}' pmaxJ{j}'],10,10,3);
end
end
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment