Diskontering av obligationens kassaflöden med känd yield
Nu när vi har lagt upp obligationens kassaflöden kan vi gå igenom stegen för att beräkna nuvärdet av varje kassaflöde och värdera obligationen. Kom ihåg att obligationens värde är summan av nuvärdet av dess kassaflöden.
I den här övningen beräknar du lämplig nuvärdesfaktor, pv_factor, för varje kassaflöde, så att vi kan beräkna nuvärdet pv för respektive kassaflöde. Sedan summerar du pv för att hitta obligationens värde.
Kom ihåg att den här obligationen har en yield på 6 %, vilket fungerar som diskonteringsränta. Den dataram du skapade i föregående övning, cf, finns tillgänglig i din arbetsyta.
Den här övningen är en del av kursen
Obligationsvärdering och analys i R
Övningsinstruktioner
- Skapa en ny kolumn,
t, i din dataramcfför att ange vilket år kassaflödet tas emot. Observera att året i det här sammanhanget motsvarar radnamnen i din dataram (1,2,3osv.). Det innebär att du kan användarownames()för att namnget. Användas.numeric()för att säkerställa att värdena itär numeriska. - Skapa ytterligare en ny kolumn,
pv_factor, i dittcf-objekt för att lagra nuvärdesfaktorn för varje år. Kom ihåg att nuvärdesfaktorn beräknas som 1 dividerat med 1 plus yieldräntan (i det här fallet 6 %, eller0.06) upphöjt till tidsvariabeln (t). - Skapa en kolumn
pvicfför att lagra nuvärdet av varje års kassaflöde. Nuvärdet beräknas som kassaflödet (cf) multiplicerat med årets nuvärdesfaktor (pv_factor). - Använd slutligen
sum()för att summera värdena ipvoch hitta obligationens värde.
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# 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(___$___)