Tính Giá trị Vốn chủ sở hữu

Định giá cổ phiếu bằng R

Cliff Ang

Senior Vice President, Compass Lexecon

Giá trị hiện tại

Giá trị vốn chủ sở hữu của doanh nghiệp bằng:

$$ V = \sum_{t=1}^T \frac{FCFE_t}{(1 + k_e)^t} + \frac{TV_T}{(1 + k_e)^T} $$

Hai thành phần ở vế phải gồm:

Giá trị hiện tại của FCFE trong giai đoạn dự phóng
Giá trị hiện tại của Giá trị cuối kỳ

PV của FCFE trong R

Giả sử FCFE cho từng năm trong 5 năm đầu là $100 triệu. Với chi phí vốn chủ sở hữu 15%, giá trị hiện tại của từng dòng tiền là:

k_e <- 0.15
cf <- rep(100, 5)
cf <- data.frame(cf)

cf$period <- seq(1, 5, 1)

cf$pv_factor <- 1 / (1 + k_e)^cf$period
cf$pv <- cf$cf * cf$pv_factor
cf

   cf period pv_factor       pv
1 100      1 0.8695652 86.95652
2 100      2 0.7561437 75.61437
3 100      3 0.6575162 65.75162
4 100      4 0.5717532 57.17532
5 100      5 0.4971767 49.71767

pv_fcfe <- sum(cf$pv)
pv_fcfe

335.2155

PV của Giá trị cuối kỳ trong R

tv_yr5 <- 858.333

k_e <- 0.15

pv_tv <- tv_yr5 / (1 + k_e)^5
pv_tv

426.7432

Giá trị vốn CSH và Giá trị trên mỗi cổ phiếu

# Kết hợp PV của FCFE và PV của Giá trị cuối kỳ
equity_value <- pv_fcfe + pv_tv
equity_value

761.9587

# Quy đổi sang giá trị trên mỗi cổ phiếu
# Giả sử có 15 triệu cổ phiếu lưu hành
shout <- 15
equity_per_share <- equity_value / shout
equity_per_share

50.79725

Cùng luyện tập nào!

Định giá cổ phiếu bằng R