Дисконтування грошових потоків облігації за відомою дохідністю
Після побудови грошових потоків облігації можемо перейти до кроків обчислення теперішньої вартості кожного потоку і визначення вартості облігації. Нагадаємо, що вартість облігації — це сума теперішніх вартостей її грошових потоків.
У цій вправі ви обчислите відповідний множник теперішньої вартості pv_factor для кожного грошового потоку, щоб знайти теперішню вартість pv кожного потоку. Потім ви просумуєте pv, щоб отримати вартість облігації.
Пам'ятайте, що дохідність цієї облігації становить 6% — вона виступає ставкою дисконту. Створений вами у попередній вправі датафрейм cf уже є у вашому робочому середовищі.
Ця вправа є частиною курсу
Оцінювання та аналіз облігацій в R
Інструкції до вправи
- Створіть новий стовпчик
tу датафрейміcf, щоб зазначити рік отримання грошового потоку. Зверніть увагу: у нашому випадку рік дорівнює назві рядка у вашому датафреймі (1,2,3тощо). Отже, ви можете просто використатиrownames()для заданняt. Застосуйтеas.numeric(), щоб значенняtбули числовими. - Створіть ще один новий стовпчик
pv_factorв об'єктіcfдля збереження річного множника теперішньої вартості. Нагадаємо: річний множник теперішньої вартості обчислюється як 1, поділена на 1 плюс ставка дохідності (у цьому разі 6% або0.06), піднесена до степеня вашої часової змінної (t). - Створіть стовпчик
pvуcfдля збереження теперішньої вартості річного грошового потоку. Теперішня вартість обчислюється як грошовий потік (cf), помножений на річний множник теперішньої вартості (pv_factor). - Нарешті, скористайтеся
sum(), щоб підсумувати значення уpvта визначити вартість облігації.
Інтерактивна практична вправа
Спробуйте виконати цю вправу, доповнивши цей зразок коду.
# 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(___$___)