Obligationsvärdering
I kapitel ett värderade du en obligation med en steg-för-steg-metod. I den här övningen ska du värdera en obligation med ett nominellt värde på 100 dollar, en kupongränta på 3 % och en återstående löptid på 8 år. Du lägger upp obligationens kassaflöden och beräknar nuvärdet av varje kassaflöde med hjälp av Aaa-avkastningen från föregående övning.
Objektet aaa_yield är förladdat i din arbetsmiljö med värdet 0.0341.
Den här övningen är en del av kursen
Obligationsvärdering och analys i R
Övningsinstruktioner
- Skapa ett kassaflödesobjekt (
cf) som innehåller obligationens kassaflöden. - Använd
data.frame()för att konverteracftill en dataram så att du kan lägga till de variabler som behövs för din analys. - Lägg till en tidsindikator (
cf$t) som representerar åren 1 till 8 med hjälp av kommandotseq(). - Beräkna nuvärdesfaktorn (
cf$pv_factor) baserat på Moody's Aaa-avkastning (aaa_yield) och din tidsindikator (cf$t). - Beräkna nuvärdet av varje kassaflöde (
cf$pv) som produkten avcf$cfoch nuvärdesfaktorn (cf$pv_factor). - Beräkna slutligen obligationens pris som
sum()av nuvärdet av varje kassaflöde.
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# 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(___)