August 15th, 2006, 4:39 pm
At least for zero defaults (first line of table 1), I could get his results. This is my Matlab code:>> p_0_given_M=inline('(1-(normcdf((x-sqrt(rho)*m)/sqrt(1-rho)))).^100')p_0_given_M = Inline function: p_0_given_M(m,rho,x) = (1-(normcdf((x-sqrt(rho)*m)/sqrt(1-rho)))).^100>> rho=.3rho = 0.3000>> x=norminv(1-exp(-.01))x = -2.3282>> m=-1m = -1>> q_i(m,rho,x)ans = 0.1863>> m=0m = 0>> q_i(m,rho,x)ans = 0.7635>> m=1m = 1>> q_i(m,rho,x)ans = 0.9711So, the conditional zero default probabilities are correct.For the unconditional ones:>> int_fct_for_p_0=inline('(1-(normcdf((x-sqrt(rho)*m)/sqrt(1-rho)))).^100.*normpdf(m)')int_fct_for_p_0 = Inline function: int_fct_for_p_0(m,rho,x) = (1-(normcdf((x-sqrt(rho)*m)/sqrt(1-rho)))).^100.*normpdf(m)>> quad(int_fct_for_p_0,-5,5,[],.0001,rho,x)ans = 0.6439So, this should be okay.