diff --git a/matlab/DsgeLikelihood.m b/matlab/DsgeLikelihood.m
index 94603e870fec0e7c9b3609fc91ba2e4212e084ec..d0a20c99bcc59eeeec4e5efa42946a7e6975e3b2 100644
--- a/matlab/DsgeLikelihood.m
+++ b/matlab/DsgeLikelihood.m
@@ -176,7 +176,7 @@ function [fval,cost_flag,ys,trend_coeff,info] = DsgeLikelihood(xparam1,gend,data
       if kalman_algo ~= 2
           kalman_algo = 1;
       end
-      Pstar = 10*eye(np);
+      Pstar = options_.Harvey_scale_factor*eye(np);
       Pinf = [];
   elseif options_.lik_init == 3	% Diffuse Kalman filter
       if kalman_algo ~= 4
diff --git a/matlab/DsgeLikelihood_hh.m b/matlab/DsgeLikelihood_hh.m
index ad28eb8773577384009996e171845c062c2066c0..11938eb645b0ced532e299ae1d181f728fe3f00e 100644
--- a/matlab/DsgeLikelihood_hh.m
+++ b/matlab/DsgeLikelihood_hh.m
@@ -177,7 +177,7 @@ function [fval,llik,cost_flag,ys,trend_coeff,info] = DsgeLikelihood_hh(xparam1,g
       if kalman_algo ~= 2
           kalman_algo = 1;
       end
-      Pstar = 10*eye(np);
+      Pstar = options_.Harvey_scale_factor*eye(np);
       Pinf = [];
   elseif options_.lik_init == 3	% Diffuse Kalman filter
       if kalman_algo ~= 4
diff --git a/matlab/DsgeSmoother.m b/matlab/DsgeSmoother.m
index 7facaef00e707b10a6b878c3c0594389e081c051..8a4ba7e65bc750c663ad7648fc9c4ec03d65d5b4 100644
--- a/matlab/DsgeSmoother.m
+++ b/matlab/DsgeSmoother.m
@@ -119,7 +119,7 @@ function [alphahat,etahat,epsilonhat,ahat,SteadyState,trend_coeff,aK,T,R,P,PK,d,
       if kalman_algo ~= 2
           kalman_algo = 1;
       end
-      Pstar = 10*eye(np);
+      Pstar = options_.Harvey_scale_factor*eye(np);
       Pinf	= [];
   elseif options_.lik_init == 3 % Diffuse Kalman filter
       if kalman_algo ~= 4
diff --git a/matlab/global_initialization.m b/matlab/global_initialization.m
index 6f06b19f78db6acecf87e16f32e0944f8fecfbb1..80107e87ab71113a5aefa5e314ce978cf6ab1088 100644
--- a/matlab/global_initialization.m
+++ b/matlab/global_initialization.m
@@ -132,6 +132,7 @@ function global_initialization()
   options_.timeless = 0;
     
   % estimation
+  options_.Harvey_scale_factor = 10;
   options_.MaxNumberOfBytes = 1e6;
   options_.MaximumNumberOfMegaBytes = 111;
   options_.PosteriorSampleSize = 1000;