R로 하는 주식 가치평가
Cliff Ang
Senior Vice President, Compass Lexecon
수학적으로 CAPM은 다음과 같습니다:
$$ E(R_i) = R_f + \beta_i (R_m - R_f) $$
여기서
베타는 일반적으로 다음 형태의 시장 모형 회귀분석으로 추정합니다:
$$ R_i = \alpha + \beta \times R_m $$
(CAPM과 달리, 시장 모형에는 무위험 수익률이 없습니다!!!)
회귀분석은 일반적으로 다음 조건으로 수행합니다
# 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]
# 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]
Preparing Video For Download...
