Analys av multipeldrivare

Aktievärdering i R

Cliff Ang

Vice President, Compass Lexecon

Medelvärde eller median är inte alltid tillämpligt

Använd medelvärde eller median om bolagen är mycket "jämförbara"
Metoder för att bedöma jämförbarhet:
- Jämför risk, tillväxt och lönsamhet
- Relativ historisk position

Regressionsbaserad metod

Regressionsanalys kan hjälpa oss att fastställa lämplig multipel för det analyserade bolaget
P/B vs. ROE, P/E vs. 5-årig EPS-tillväxt eller multipel regression
Ger en mer objektiv bedömning av lämplig värderingsmultipel

Exempel: 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), ]

Exempel: P/B vs. ROE

Diagram

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

Exempel: 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

Anta en ROE på 10 % och ett BVPS på 30 $, vad är det implicita priset?

# Implicit Price-to-Book
roe <- 0.10
implied_p_b <- a + b * roe
implied_p_b

2.071627

# Implicit pris
bvps <- 30
implied_price <- implied_p_b * bvps
implied_price

62.14881

Nu kör vi en övning!

Aktievärdering i R