1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
function display_conditional_variance_decomposition(conditional_decomposition_array,Steps,SubsetOfVariables,M_,options_)
% This function displays the conditional variance decomposition of a given state space model
% for a subset of endogenous variables.
%
% INPUTS
% conditional_decomposition_array [matrix] Output matrix from compute_conditional_variance_decomposition
% Steps [integer] 1*h vector of dates.
% SubsetOfVariables [integer] 1*q vector of indices.
% M_ [structure] Dynare structure containing the
% Model description
% options_ [structure] Dynare structure containing the
% options
% OUTPUTS
% none
%
% Copyright (C) 2010-2018 Dynare Team
%
% This file is part of Dynare.
%
% Dynare is free software: you can redistribute it and/or modify
% it under the terms of the GNU General Public License as published by
% the Free Software Foundation, either version 3 of the License, or
% (at your option) any later version.
%
% Dynare is distributed in the hope that it will be useful,
% but WITHOUT ANY WARRANTY; without even the implied warranty of
% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
% GNU General Public License for more details.
%
% You should have received a copy of the GNU General Public License
% along with Dynare. If not, see <https://www.gnu.org/licenses/>.
if size(conditional_decomposition_array,3)==M_.exo_nbr %no ME input
shock_number=M_.exo_nbr;
headers = M_.exo_names;
headers(M_.exo_names_orig_ord) = headers;
if options_.TeX
headers_TeX = vertcat(' ', M_.exo_names_tex);
end
title_addon='';
elseif size(conditional_decomposition_array,3)==M_.exo_nbr+1 %ME input
shock_number=M_.exo_nbr+1;
headers = M_.exo_names;
headers(M_.exo_names_orig_ord) = headers;
headers = vertcat(headers, 'ME');
if options_.TeX
headers_TeX = vertcat(M_.exo_names_tex, 'ME');
headers_TeX = vertcat(' ', headers_TeX);
end
title_addon=' - WITH MEASUREMENT ERROR';
else
error('display_conditional_variance_decomposition:: This case should not happen. Please contact the developers')
end
if options_.order == 2
skipline()
title=['APPROXIMATED CONDITIONAL VARIANCE DECOMPOSITION (in percent)',title_addon];
disp(title)
else
skipline()
title=['CONDITIONAL VARIANCE DECOMPOSITION (in percent)',title_addon];
disp(title)
end
headers = vertcat(' ', headers);
labels=get_labels_transformed_vars(M_.endo_names,SubsetOfVariables,options_,false);
lh = cellofchararraymaxlength(labels)+2;
if options_.TeX
labels_TeX=get_labels_transformed_vars(M_.endo_names,SubsetOfVariables,options_,true);
lh = cellofchararraymaxlength(labels_TeX)+2;
end
vardec_i = zeros(length(SubsetOfVariables), shock_number);
for i=1:length(Steps)
disp(['Period ' int2str(Steps(i)) ':'])
for j=1:shock_number
vardec_i(:,j) = 100*conditional_decomposition_array(:,i,j);
end
dyntable(options_, '', headers, labels, vardec_i, lh, 8, 2);
if options_.TeX
dyn_latex_table(M_, options_, [title, '; Period ' int2str(Steps(i))], ['th_var_decomp_cond_h', int2str(Steps(i))], headers_TeX, labels_TeX, vardec_i, lh, 8, 2);
end
end
|
