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

Changes to markov file in ms-sbvar to work with new code

time-shift
Jacob Smith 2011-03-01 11:25:53 -05:00
parent 917b8e5285
commit d87484ec8e
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
matlab/ms-sbvar/ms_write_markov_file.m
View File

@ -8,7 +8,7 @@ function ms_write_markov_file(fname,M,options)
%/********************* Markov State Variable Information **********************/
%/******************************************************************************/
fprintf(fh,'//== Flat Independent Markov States and Simple Restrictions ==//\n\n');
fprintf(fh,'//== Markov State Variables with Simple Restrictions ==//\n\n');
%//This number is NOT used but read in.
@ -33,8 +33,8 @@ function ms_write_markov_file(fname,M,options)
%//== column of the transition matrix. Each element must be positive. For each column,
%//== the relative size of the prior elements determine the relative size of the elements
%//== of the transition matrix and overall larger sizes implies a tighter prior.
fprintf(fh,['//== Transition matrix prior for state_variable[%d]. ' ...
'(n_states x n_states) ==//\n'],i_chain);
fprintf(fh,['//== Transition matrix prior for state_variable[%d] ==//\n'], ...
i_chain);
Alpha = ones(n_states,n_states);
for i_state = 1:n_states
p = 1-1/options.ms.ms_chain(i_chain).state(i_state).duration;
@ -43,7 +43,7 @@ function ms_write_markov_file(fname,M,options)
fprintf(fh,'\n');
end
fprintf(fh,['\n//== Free Dirichet dimensions for state_variable[%d] ' ...
fprintf(fh,['\n//== Dirichlet dimensions for state_variable[%d] ' ...
'==//\n'],i_chain);
% fprintf(fh,'%d ',repmat(n_states,1,n_states));
fprintf(fh,'%d ',repmat(2,1,n_states));