Bilinen bir getiriyle tahvil nakit akışlarını iskonto etme
Tahvilin nakit akışlarını çıkardıktan sonra, şimdi her nakit akışının bugünkü değerini hesaplama adımlarını uygulayıp tahvilin değerini bulabiliriz. Unutma, tahvilin değeri, nakit akışlarının bugünkü değerlerinin toplamıdır.
Bu egzersizde, her nakit akışı için uygun bugünkü değer faktörünü pv_factor hesaplayacak, sonra her nakit akışının bugünkü değerini pv olarak bulacağız. Son olarak pv değerlerini toplayarak tahvilin değerini hesaplayacaksın.
Bu tahvilin getirisinin %6 olduğunu ve bunun iskonto oranı olarak kullanıldığını hatırla. Önceki egzersizde oluşturduğun veri çerçevesi cf, çalışma alanında mevcut.
Bu egzersiz
R ile Tahvil Değerleme ve Analizi
kursunun bir parçasıdırEgzersiz talimatları
- Nakit akışının hangi yılda alındığını göstermek için
cfveri çerçevende yeni birtsütunu oluştur. Burada yıl, veri çerçevendeki satır adlarıyla (1,2,3, vb.) aynıdır. Bu yüzdentsütununu adlandırmak için doğrudanrownames()kullanabilirsin. Değerlerin sayısal olduğundan emin olmak içinas.numeric()kullan. - Her yılın bugünkü değer faktörünü saklamak için
cfnesnende bir başka yeni sütun,pv_factor, oluştur. Her yılın bugünkü değer faktörünün, 1 bölü (1 + getiri oranı) üzeri zaman değişkeni (t) olarak hesaplandığını unutma (bu durumda getiri %6 ya da0.06). - Her yılın nakit akışının bugünkü değerini saklamak için
cfiçinde birpvsütunu oluştur. Bugünkü değer, nakit akışı (cf) ile yılın bugünkü değer faktörünün (pv_factor) çarpımıdır. - Son olarak, tahvilin değerini bulmak için
sum()ilepviçindeki değerleri topla.
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
# 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(___$___)