Obligatiewaardering
In Hoofdstuk Eén heb je een obligatie stap voor stap gewaardeerd. In deze oefening waardeer je een obligatie met een nominale waarde van $100, een couponrente van 3% en een resterende looptijd van 8 jaar. Je zet de kasstromen van de obligatie op een rij en berekent de contante waarde van elk van die kasstromen met de Aaa-rente die je in de vorige oefening hebt bepaald.
Het object aaa_yield is vooraf ingeladen in je werkruimte met de waarde 0.0341.
Deze oefening maakt deel uit van de cursus
Obligatiewaardering en -analyse in R
Oefeninstructies
- Maak een kasstroomobject (
cf) met de kasstromen van de obligatie. - Gebruik
data.frame()omcfom te zetten naar een data frame, zodat je extra variabelen kunt toevoegen voor je analyse. - Voeg een tijdsindicator (
cf$t) toe die de jaren 1 tot en met 8 voorstelt met het commandoseq(). - Bereken de contantewaardefactor (
cf$pv_factor) op basis van Moody's Aaa-rente (aaa_yield) en je tijdsindicator (cf$t). - Bereken de contante waarde van elke kasstroom (
cf$pv) als het product vancf$cfen de contantewaardefactor (cf$pv_factor). - Bereken tot slot de prijs van de obligatie als de
sum()van de contante waarden van alle kasstromen.
Interactieve oefening met praktijkervaring
Probeer deze oefening door deze voorbeeldcode aan te vullen.
# Layout the bond's cash flows
cf <- c(___, ___, ___, ___, ___, ___, ___, ___)
# Convert to data.frame
cf <-
# Add time indicator
cf$t <- seq(___, ___, ___)
# Calculate PV factor
cf$pv_factor <- 1 / (1 + ___)^___
# Calculate PV
cf$pv <-
# Price bond
sum(___)