실전 예시

R로 배우는 중급 포트폴리오 분석

Ross Bennett

Instructor

실전 예시

업계에서 다루는 유형과 유사한 포트폴리오 최적화 문제를 해결합니다
본 과정에서 배운 기법을 적용합니다
- 제약과 목표가 있는 포트폴리오를 지정합니다
- 과거 데이터로 기간별 리밸런싱 최적화를 실행합니다
- 결과를 분석합니다
- 제약, 목표, 모멘트 추정을 개선합니다
데이터
- EDHEC-Risk 대체 지수 월별 수익률 {6}
- 1997년 1월 ~ 2016년 3월

data(indexes)
returns <- indexes[,1:4]

# Equal weight benchmark
n <- ncol(returns)
equal_weights <- rep(1 / n, n)

benchmark_returns <- Return.portfolio(R = returns, 
                                      weights = equal_weights,
                                      rebalance_on = "years")
colnames(benchmark_returns) <- "benchmark"

# Benchmark performance
table.AnnualizedReturns(benchmark_returns)

                          benchmark
Annualized Return            0.0775
Annualized Std Dev           0.1032
Annualized Sharpe (Rf=0%)    0.7509

기본 포트폴리오 정의

기준 사례로 사용할 포트폴리오 사양을 정의합니다
기준 사양은 제약을 완화하고 기본 목표를 둔 단순한 접근입니다

# Base portfolio specification
base_port_spec <- portfolio.spec(assets = colnames(returns))
base_port_spec <- add.constraint(portfolio = base_port_spec,
                                 type = "full_investment")
base_port_spec <- add.constraint(portfolio = base_port_spec,
                                 type = "long_only")
base_port_spec <- add.objective(portfolio = base_port_spec, 
                                type = "risk", name = "StdDev")

연습해 봅시다!

R로 배우는 중급 포트폴리오 분석