Fixed wrong ordering of the hyperparameters when walling the routine for drawing random deviates from the Weibull distribution.

time-shift
Stéphane Adjemian (Lupi) 2016-03-04 16:45:06 +01:00
parent 472f6c4a1c
commit 08375e7ba6
1 changed files with 2 additions and 2 deletions

View File

@ -166,10 +166,10 @@ if inverse_gamma_2_draws
end
if weibull_draws
pdraw(weibull_index) = wblrnd(p6(weibull_index), p7(weibull_index)) + p3(weibull_index);
pdraw(weibull_index) = wblrnd(p7(weibull_index), p6(weibull_index)) + p3(weibull_index);
out_of_bound = find( (pdraw(weibull_index)'>ub(weibull_index)) | (pdraw(weibull_index)'<lb(weibull_index)));
while ~isempty(out_of_bound),
pdraw(weibull_index(out_of_bound)) = wblrnd(p6(weibull_index(out_of_bound)),p7(weibull_index(out_of_bound)))+p3(weibull_index(out_of_bound));
pdraw(weibull_index(out_of_bound)) = wblrnd(p7(weibull_index(out_of_bound)),p6(weibull_index(out_of_bound)))+p3(weibull_index(out_of_bound));
out_of_bound = find( (pdraw(weibull_index)'>ub(weibull_index)) | (pdraw(weibull_index)'<lb(weibull_index)));
end
end