(연환산) 샤프 비율

R로 배우는 포트폴리오 분석 입문

Kris Boudt

Professor, Free University Brussels & Amsterdam

성과 벤치마킹

ch_2_video_2.003.png

R로 배우는 포트폴리오 분석 입문

성과 벤치마킹

ch_2_video_2.004.png

R로 배우는 포트폴리오 분석 입문

위험-수익 상충관계

ch_2_video_2.006.png

R로 배우는 포트폴리오 분석 입문

위험-수익 상충관계

ch_2_video_2.007.png

R로 배우는 포트폴리오 분석 입문

위험-수익 상충관계

ch_2_video_2.008.png

R로 배우는 포트폴리오 분석 입문

위험-수익 상충관계

ch_2_video_2.009.png

R로 배우는 포트폴리오 분석 입문

위험-수익 상충관계

ch_2_video_2.010.png

R로 배우는 포트폴리오 분석 입문

위험-수익 상충관계

ch_2_video_2.011.png

R로 배우는 포트폴리오 분석 입문

자본배분선

ch_2_video_2.013.png

R로 배우는 포트폴리오 분석 입문

자본배분선

ch_2_video_2.014.png

R로 배우는 포트폴리오 분석 입문

자본배분선

ch_2_video_2.015.png

R로 배우는 포트폴리오 분석 입문

자본배분선

ch_2_video_2.016.png

R로 배우는 포트폴리오 분석 입문

샤프 비율

ch_2_video_2.018.png

R로 배우는 포트폴리오 분석 입문

샤프 비율

ch_2_video_2.019.png

R로 배우는 포트폴리오 분석 입문

샤프 비율

ch_2_video_2.020.png

R로 배우는 포트폴리오 분석 입문

샤프 비율

ch_2_video_2.021.png

R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c(-0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)

ch_2_video_2.024.png

R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c(-0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)
mean(sample_returns)

ch_2_video_2.025.png

R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c(-0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)
mean.geometric(sample_returns)

ch_2_video_2.026.png

R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c(-0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)
StdDev(sample_returns)

ch_2_video_2.027.png

R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c(-0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)
(mean(sample_returns)-0.004)/StdDev(sample_returns)

ch_2_video_2.028.png

R로 배우는 포트폴리오 분석 입문

월간 성과의 연환산

Screenshot 2019-08-21 at 11.00.36.png

  • 산술평균: 월간 평균 * 12
  • 기하평균, $R_i$가 월수익률일 때:
    • $[(1+R_1)\cdot(1+R_2)\cdot...\cdot(1+R_T)]^{12/T} -1$
  • 변동성: 월간 변동성 * sqrt(12)
R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c( -0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)


ch_2_video_2.036.png

R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c( -0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)
Return.annualized(sample_returns, scale = 12, geometric = FALSE)

ch_2_video_2.037.png

R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c( -0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)
Return.annualized(sample_returns, scale = 12, geometric = TRUE)

ch_2_video_2.038.png

R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c( -0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)
Std.Dev.annualized(sample_returns, scale = 12)

ch_2_video_2.039.png

R로 배우는 포트폴리오 분석 입문

성과 지표 실습

library(PerformanceAnalytics)
sample_returns <- c( -0.02, 0.00, 0.00, 0.06, 0.02, 0.03, -0.01, 0.04)
Return.annualized(sample_returns, scale = 12)/
    Std.Dev.annualized(sample_returns, scale = 12)

ch_2_video_2.040.png

R로 배우는 포트폴리오 분석 입문

Ayo berlatih!

R로 배우는 포트폴리오 분석 입문

Preparing Video For Download...