qlognorm.m

来自「一个非常实用的统计工具箱」· M 代码 · 共 16 行

function x = qlognorm(p,lambda,zeta)
%QLOGNORM  The inverse log-normal distribution function
% 
%          x = plognorm(p, lambda, zeta)

%        Copyright (c) Anders Holtsberg

if any(any(abs(2*p-1)>1))
   error('A probability should be 0<=p<=1, please!')
end
if any(any(zeta<=0))
   error('Parameter zeta is wrong')
end

x = exp(erfinv(2*p-1).*sqrt(2).*zeta + lambda);