diff --git a/matlab/gsa/skewness.m b/matlab/gsa/gsa_skewness.m similarity index 79% rename from matlab/gsa/skewness.m rename to matlab/gsa/gsa_skewness.m index 5188a4892..6b798f449 100644 --- a/matlab/gsa/skewness.m +++ b/matlab/gsa/gsa_skewness.m @@ -1,4 +1,4 @@ -function s=skewness(y), +function s=gsa_skewness(y), % y=stand_(y); % s=mean(y.^3); diff --git a/matlab/gsa/speed.m b/matlab/gsa/gsa_speed.m similarity index 94% rename from matlab/gsa/speed.m rename to matlab/gsa/gsa_speed.m index 791d05220..7df967b3e 100644 --- a/matlab/gsa/speed.m +++ b/matlab/gsa/gsa_speed.m @@ -1,5 +1,5 @@ -function [tadj, iff] = speed(A,B,mf,p), -% [tadj, iff] = speed(A,B,mf,p), +function [tadj, iff] = gsa_speed(A,B,mf,p), +% [tadj, iff] = gsa_speed(A,B,mf,p), % % Part of the Sensitivity Analysis Toolbox for DYNARE % diff --git a/matlab/gsa/log_trans_.m b/matlab/gsa/log_trans_.m index 2aa16481f..49c4b1139 100644 --- a/matlab/gsa/log_trans_.m +++ b/matlab/gsa/log_trans_.m @@ -3,10 +3,10 @@ function [yy, xdir, isig, lam]=log_trans_(y0,xdir0) if nargin==1, xdir0=''; end -f=inline('skewness(log(y+lam))','lam','y'); +f=inline('gsa_skewness(log(y+lam))','lam','y'); isig=1; if ~(max(y0)<0 | min(y0)>0) - if skewness(y0)<0, + if gsa_skewness(y0)<0, isig=-1; y0=-y0; end diff --git a/matlab/gsa/map_ident_.m b/matlab/gsa/map_ident_.m index bfe125ab0..689486a20 100644 --- a/matlab/gsa/map_ident_.m +++ b/matlab/gsa/map_ident_.m @@ -127,7 +127,7 @@ if opt_gsa.load_ident_files==0, % ino=find(~ismember([1:nr],io)); % T2=A(ino,1:nr,:); R=A(:,nr+1:nc,:); -% [tadj, iff] = speed(A(1:nr,1:nr,:),R,io,0.5); +% [tadj, iff] = gsa_speed(A(1:nr,1:nr,:),R,io,0.5); % [tadj, j0, ir_tadj, ic_tadj] = teff(tadj,Nsam,istable); % [iff, j0, ir_if, ic_if] = teff(iff,Nsam,istable);