Biaya Ekuitas
Pada latihan ini, Anda diminta menghitung biaya ekuitas CAPM per akhir tahun 2016. Perusahaan yang dinilai memiliki beta sebesar 1,46, disimpan dalam beta. Anda perlu menghitung tingkat bebas risiko dan premi risiko ekuitas berdasarkan teknik yang Anda pelajari di bab sebelumnya. Data mentah untuk US Treasury 10-Tahun dari Federal Reserve Electronic Database disimpan dalam treas dan data dari website Profesor Damodaran untuk imbal hasil Indeks S&P 500 dan obligasi Treasury 10-Tahun disimpan dalam damodaran.
Latihan ini adalah bagian dari kursus
Penilaian Ekuitas di R
Petunjuk latihan
- Subset data US Treasury ke 30 Desember 2016.
- Pertahankan kolom ke-2 (yield).
- Konversikan tingkat bebas risiko dari persentase menjadi desimal.
- Hitung selisih tahunan antara imbal hasil S&P dan imbal hasil US Treasury Bond.
- Hitung rata-rata selisih imbal hasil tersebut.
- Hitung Biaya Ekuitas CAPM.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# Subset Treasury data to 12/30/16
rf <- subset(treas, ___)
# Keep 2nd column
rf_yield <- ___
# Convert to decimal terms
rf_yield_dec <- ___
rf_yield_dec
# Calcualte difference between S&P 500 Return and Treasury Return
diff <- ___
# Calculate average difference
erp <- ___
erp
# Calculate CAPM Cost of Equity
ke <- ___
ke