Analýza determinantů násobků

Oceňování akcií v R

Cliff Ang

Vice President, Compass Lexecon

Průměr nebo medián nemusí být vždy vhodný

Průměr nebo medián použijte, jsou-li firmy skutečně „srovnatelné"
Způsoby posouzení srovnatelnosti:
- Porovnání rizika, růstu a ziskovosti
- Relativní historická pozice

Regresní přístup

K určení vhodného násobku lze použít regresní analýzu
P/B vs. ROE, P/E vs. 5letý růst EPS nebo vícerozměrná regrese
Méně subjektivní způsob stanovení oceňovacího násobku

Příklad: P/B vs. ROE

finl <- subset(midcap400, gics_sector == "Financials")

finl$roe <- finl$ltm_eps / finl$bvps

finl$p_bv <- ifelse(finl$bvps < 0, NA, finl$price / finl$bvps)

finl <- finl[complete.cases(finl), ]

Příklad: P/B vs. ROE

Graf

$$P/B = -0.365 + 24.37 * ROE$$ $$R-squared = 0.8462$$

Příklad: P/B vs. ROE

reg <- lm(p_bv ~ roe, data = finl)

a <- summary(reg)$coeff[1]
a

-0.3654199

b <- summary(reg)$coeff[2]
b

24.37047

Předpokládejte ROE 10 % a BVPS $30. Jaká je implikovaná cena?

# Implikovaný poměr P/B
roe <- 0.10
implied_p_b <- a + b * roe
implied_p_b

2.071627

# Implikovaná cena
bvps <- 30
implied_price <- implied_p_b * bvps
implied_price

62.14881

Pojďme si procvičit!

Oceňování akcií v R