Merton: Merton's model

Description Usage Arguments Details Value References Examples

View source: R/Merton.R

Description

Merton calculates the survival probability Q(τ > T) for each maturity according to the structural Merton's model.

Usage

1
Merton(L, V0, sigma, r, t)

Arguments

L

debt face value at maturity t = T; if the value of the firm V_T is below the debt face value to be paid in T the company default has occurred (it is a constant value).

V0

firm value at time t = 0 (it is a constant value).

sigma

volatility (constant for all t).

r

risk-free rate (constant for all t).

t

a vector of debt maturity structure. The last value of this vector rapresents the debt maturity T.

Details

In Merton's model the default event can occur only at debt maturity T and not before. In this model the debt face value L represents the constant safety level. In this model the firm value is the sum of the firm equity value St and ad the firm debt value Dt. The debt value at time t < T is calculated by the formula:

D_t = L * \exp^{- r * (T - t)} - Put(t, T; V_t, L)

The equity value can be derived as a difference between the firm value and the debt:

S_t = V_t - D_t = V_t - L * \exp^{- r * (T - t)} + Put(t, T; V_t, L) = Call(t, T; V_t, L)

(by the put-call parity) so that in the Merton's model the equity can be interpreted as a Call option on the value of the firm.

Value

Merton returns an object of class data.frame with:

References

Damiano Brigo, Massimo Morini, Andrea Pallavicini (2013) Counterparty Credit Risk, Collateral and Funding. With Pricing Cases for All Asset Classes

Examples

1
2
3
4
5
6
7
mod <- Merton(L = 10, V0 = 20, sigma = 0.2, r = 0.005,
              t = c(0.50, 1.00, 2.00, 3.25, 5.00, 10.00, 15.00, 20.00))
mod

plot(c(0.50, 1.00, 2.00, 3.25, 5.00, 10.00, 15.00, 20.00), mod$Surv,
     main = 'Survival Probability for different Maturity \n (Merton model)',
     xlab = 'Maturity', ylab = 'Survival Probability', type = 'b')

Example output

  Maturity       Vt       St        Dt  Survival
1     0.50 20.05006 12.11017  7.939896 0.9999994
2     1.00 20.10025 12.10338  7.996875 0.9996515
3     2.00 20.20100 12.08894  8.112066 0.9900148
4     3.25 20.32765 12.06936  8.258293 0.9604587
5     5.00 20.50630 12.03943  8.466872 0.9094699
6    10.00 21.02542 11.94670  9.078718 0.7845463
7    15.00 21.55768 11.90165  9.656037 0.6963760
8    20.00 22.10342 12.10342 10.000000 0.6305607

CreditRisk documentation built on May 1, 2019, 9:38 p.m.