Penilaian obligasi
Penilaian dan Analisis Obligasi di R
Clifford Ang
Senior Vice President, Compass Lexecon
Penilaian obligasi
- Kupon tahunan tetap
- Tanggal jatuh tempo tetap
- Tanpa opsi
Nilai suatu aset
- Nilai aset = nilai kini arus kas masa depan yang diharapkan
- Arus kas: didiskonto dengan tingkat diskonto yang disesuaikan risiko
$$
$$V = \sum_{t=1}^{T} \frac{CF_t}{(1+y)^t}$$
$CF$: arus kas
$y$: tingkat diskonto
Rangkaian arus kas obligasi
- Sebelum jatuh tempo, investor menerima pembayaran kupon
$$\sum_{t=1}^{T-1} \frac{CF_t}{(1+y)^t}$$
- Catatan: jumlah hingga $T-1$
- Saat jatuh tempo, investor menerima kupon terakhir dan nilai pari
$$V = \sum_{t=1}^{T-1} \frac{CF_t}{(1+y)^t} + \frac{C_T + P}{(1+y)^T}$$
Membuat vektor arus kas
$$
$$V = \sum_{t=1}^{T} \frac{CF_t}{(1+y)^t} + \frac{C_T + P}{(1+y)^T}$$
$$
cf <- c(c1, c2, c3, c4, c5, ...)
Mengonversi ke data frame
- Agar bisa menambah kolom lain, ubah vektor arus kas menjadi data frame
- Gunakan perintah
data.frame()cf <- data.frame(cf)
Membuat indeks waktu
- Tiap arus kas terjadi pada periode tertentu
- Satuan periode: tahun
- Kita buat variabel indeks waktu
cf$t <- c(1, 2, 3, 4, 5, ...)
Menghitung faktor PV
- Untuk mendiskonto arus kas, kita perlu "tingkat diskonto"
- Untuk obligasi, tingkat diskonto disebut "yield"
- Kita buat faktor nilai kini untuk diskonto
cf$pv_factor <- 1 / (1 + y)^cf$t
pv_factor <- 1 / (1 + .10)^2
pv_factor
0.8264463
PV arus kas
- Kita hitung nilai kini tiap arus kas
cf$pv <- cf$cf * cf$pv_factor
- Jumlah nilai kini arus kas obligasi sama dengan nilai obligasi
sum(cf$pv)
Ayo berlatih!
Penilaian dan Analisis Obligasi di R
