股權資金成本
在本練習中，你要計算 2016 年底的 CAPM 股權資金成本。標的公司的 beta 為 1.46，已存於 beta。你需要依照先前章節所學的方法，計算無風險利率與股權風險溢酬。來自美國聯準會電子資料庫的 10 年期美國公債原始資料存於 treas，而 S&P 500 指數與 10 年期公債的報酬率資料，取自 Damodaran 教授的［網站］(http://www.damodaran.com)，並存於 damodaran。
本練習屬於課程
在 R 進行股權估值
練習說明
- 將美國公債資料篩選為 2016-12-30。
- 保留第 2 欄（殖利率）。
- 將無風險利率由百分比轉為小數。
- 計算 S&P 報酬與美國公債報酬的年度差值。
- 計算報酬差值的平均數。
- 計算 CAPM 股權資金成本。
動手互動練習
試著完成這個範例程式碼，體驗一下這個練習。
# 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