Contant maken van obligatiekasstromen met een bekende yield
Nu we de kasstromen van de obligatie hebben uitgeschreven, kunnen we de stappen doorlopen om de contante waarde van elke kasstroom te berekenen en de obligatie te waarderen. Onthoud dat de waarde van de obligatie de som is van de contante waarde van de kasstromen.
In deze oefening bereken je voor elke kasstroom de juiste contantewaardefactor, pv_factor, zodat we de contante waarde pv van elke kasstroom kunnen bepalen. Daarna tel je de pv op om de waarde van de obligatie te vinden.
Denk eraan: deze obligatie heeft een yield van 6%, die fungeert als disconteringsvoet. Het gegevensframe dat je in de vorige oefening hebt gemaakt, cf, staat klaar in je werkruimte.
Deze oefening maakt deel uit van de cursus
Obligatiewaardering en -analyse in R
Oefeninstructies
- Maak een nieuwe kolom
tin jecf-gegevensframe om het jaar aan te geven waarin de kasstroom wordt ontvangen. Voor dit doel is het jaar gelijk aan de naam van de rijen in je gegevensframe (1,2,3, enz.). Je kunt dus eenvoudigrownames()gebruiken omtte vullen. Gebruikas.numeric()om ervoor te zorgen dat de waarden vantnumeriek zijn. - Maak nog een nieuwe kolom
pv_factorin jecf-object om de contantewaardefactor per jaar op te slaan. Onthoud dat de contantewaardefactor per jaar wordt berekend als 1 gedeeld door 1 + het yieldpercentage (in dit geval 6%, of0.06) tot de macht van je tijdsvariabele (t). - Maak een
pv-kolom incfom de contante waarde van de kasstroom per jaar op te slaan. De contante waarde wordt berekend als kasstroom (cf) vermenigvuldigd met de contantewaardefactor van dat jaar (pv_factor). - Gebruik tot slot
sum()om de waarden inpvop te tellen en zo de waarde van de obligatie te bepalen.
Interactieve oefening met praktijkervaring
Probeer deze oefening door deze voorbeeldcode aan te vullen.
# Add column t to cf
cf$t <- as.numeric(___(___))
# Calculate pv_factor
cf$pv_factor <- 1 / (1 + ___)^___
# Calculate pv
cf$pv <- ___ * ___
# Calculate the bond price
sum(___$___)