42 lines
1001 B
Matlab
42 lines
1001 B
Matlab
|
% Copyright (C) 2001 Michel Juillard
|
||
|
|
%
|
||
|
|
function gcompare(s1,s2)
|
||
|
|
% GCOMPARE : GCOMPARE ( [ 'file1' ; 'file2' ] , [ 'var1' ; 'var2' ...] )
|
||
|
|
% This optional command plots the trajectories of a list of
|
||
|
|
% variables in two different simulations. One plot is drawn
|
||
|
|
% for each variable. The trajectories must have been previously
|
||
|
|
% saved by the instruction DYNASAVE. The simulation in file1
|
||
|
|
% is refered to as the base simulation.
|
||
|
|
|
||
|
|
|
||
|
|
global options_ M_
|
||
|
|
global nvx nvy x y lag1
|
||
|
|
|
||
|
|
ftest(s1,s2) ;
|
||
|
|
|
||
|
|
ix = [1-lag1(1):size(x,2)-lag1(1)]' ;
|
||
|
|
i = [lag1(1):size(ix,1)-lag1(2)+1]' ;
|
||
|
|
|
||
|
|
if options_.smpl == 0
|
||
|
|
i = [M_.maximum_lag:size(y,2)]' ;
|
||
|
|
else
|
||
|
|
i = [options_.smpl(1):options_.smpl(2)]' ;
|
||
|
|
end
|
||
|
|
|
||
|
|
for k = 1:size(x,1)
|
||
|
|
figure ;
|
||
|
|
plot (ix(i),x(k,i),ix(i),y(k,i)) ;
|
||
|
|
xlabel (['Periods']) ;
|
||
|
|
title (['Variable ' s2(k,:)]) ;
|
||
|
|
l = min(i) + 1;
|
||
|
|
ll = max(i) - 1 ;
|
||
|
|
text (l,x(k,l),s1(1,:)) ;
|
||
|
|
text (ll,y(k,ll),s1(2,:)) ;
|
||
|
|
end
|
||
|
|
|
||
|
|
% 06/18/01 MJ corrected treatment of options_.smpl
|
||
|
|
% 06/24/01 MJ removed color specification
|
||
|
|
|
||
|
|
|
||
|
|
|