intraMLE {AssetCorr} | R Documentation |

The default process in the Vasicek model follows a binomial distribution, conditional on the realization of the systematic factor. Hence, the intra asset correlation can be estimated by maximizing the Vasicek-binomial log likelihood.

intraMLE(d, n, B =0, DB=c(0,0), JC = FALSE, CI, CI_Boot, type="bca", plot=FALSE)

`d` |
a vector, containing the default time series of the sector. |

`n` |
a vector, containing the number of obligors at the beginning of the period in the sector. |

`B` |
an integer, indicating how many bootstrap repetitions should be used for the single bootstrap corrected estimate. |

`DB` |
a combined vector, indicating how many bootstrap repetitions should be used for the inner (first entry) and outer loop (second entry) to correct the bias using the double bootstrap. |

`JC` |
a logical variable, indicating if the jackknife corrected estimate should be calculated. |

`CI` |
a number, indicating the desired asymptotic confidence interval of the estimate. |

`CI_Boot` |
a number, indicating the desired bootstrap confidence interval of the estimate, if the single bootstrap correction is specified. By default, the interval is calculated as the bootstrap corrected and accelerated confidence interval (Bca). Furthermore, the analytical confidence intervals are provided, using the same value as |

`type` |
a string, indicating the type of bootstrap intervals. For more details see |

`plot` |
a logical variable, indicating whether a plot of the single bootstrap density should be generated. |

In the Vasicek model the default process can be expressed as independent binomial trials, conditional on the realization of the systematic factor. Therefore Gordy and Heitfield (2010) introduced an estimator of the intra asset correlation based on the log-likelihood maximization. For theoretical background see Gordy and Heitfield (2010).

The log-likelihood will be maximized for values between 0 and 1. The asymptotic confidence interval will be estimated using maximum likelihood theory. If `DB`

is specified, the single bootstrap corrected estimate will be calculated by using the bootstrap values of the outer loop (`oValues`

).

The returned value is a list, containing the following components (depending on the selected arguments):

`Original` |
Estimate of the original method |

`Bootstrap` |
Bootstrap corrected estimate |

`Double_Bootstrap` |
Double bootstrap corrected estimate |

`Jackknife` |
Jackknife corrected estimate |

`CI` |
Selected two-sided asymptotic confidence interval |

`CI_Boot` |
Selected two-sided bootstrap confidence interval |

`bValues` |
Estimates from the single bootstrap resampling |

`iValues` |
Estimates from the double bootstrap resampling- inner loop |

`oValues` |
Estimates from the double bootstrap resampling- outer loop |

Chang J, Hall P (2015).
“Double-bootstrap methods that use a single double-bootstrap simulation.”
*Biometrika*, **102**(1), 203–214.

Efron B, Tibshirani RJ (1994).
*An introduction to the bootstrap*.
CRC press.

Gordy MB, Heitfield E (2010).
“Small-sample estimation of models of portfolio credit risk.”
In *Recent Advances in Financial Engineering: Proceedings of the KIER-TMU International Workshop on Financial Engineering, 2009: Otemachi, Sankei Plaza, Tokyo, 3-4 August 2009*, 43–63.

`intraAMM`

, `intraFMM`

, `intraJDP2`

,
`intraCMM`

, `intraJDP1`

, `intraAMLE`

,
`intraMode`

,`intraBeta`

set.seed(11) d=defaultTimeseries(1000,0.3,20,0.01) n=rep(1000,20) IntraCorr=intraMLE(d,n) #Estimation with confidence intervals IntraCorr=intraMLE(d,n, CI=0.95 ) #Jackknife correction IntraCorr=intraMLE(d,n, JC=TRUE) #Bootstrap correction with bootstrap confidence intervals IntraCorr=intraMLE(d,n, B=1000, CI_Boot=0.95 ) #Bootstrap correction with bootstrap confidence intervals and plot IntraCorr=intraMLE(d,n, B=1000, CI_Boot=0.95, plot=TRUE ) #Double Bootstrap correction with 10 repetitions in the inner loop and 50 in the outer loop IntraCorr=intraMLE(D1,N1, DB=c(10,50))

[Package *AssetCorr* version 1.0.4 Index]