Len Mills
5/24/2015
Raw data sources
Original, combined LTV to a mark-to-market LTV
The dataset contains four variables for each of the ~640 loans:
cbind(length(dat$mkt_cltv),
round(100*mean(dat$default),2),
round(100*mean(dat$prepay),2),
round(mean(dat$mkt_cltv),2))
[,1] [,2] [,3] [,4]
[1,] 663976 0.89 68.1 67.39
dat$mltv_group <- cut(dat$mkt_cltv,breaks=seq(0,200,7))
mltv_profile <- ddply(dat, .(mltv_group),
summarise, default_rate = 100*mean(default), prepay_rate =
100*mean(prepay))
An interactive version of this mark-to-market profile can be found at An MLTV Profile Visualization.