Oceňování akcií v R
Cliff Ang
Senior Vice President, Compass Lexecon
Matematicky je CAPM vyjádřen takto:
$$ E(R_i) = R_f + \beta_i (R_m - R_f) $$
kde
Beta se obvykle odhaduje pomocí regrese tržního modelu ve tvaru:
$$ R_i = \alpha + \beta \times R_m $$
(na rozdíl od CAPM tržní model bezrizikovou sazbu neobsahuje!!!)
kde
Regrese se obvykle provádí s
# Calculate stock return rets <- Delt(prices$firm_ret)# Calculate market return rets$spy <- Delt(prices$spy)# Rename first variable names(rets)[1] <- "firm_ret"# Remove first observation - NA rets <- rets[-1, ]# Run regression reg <- lm(myl ~ spy, data = rets)# Extract beta beta <- summary(reg)$coeff[2]
Oceňování akcií v R