가중 평균 (3)

재활용(recycling) 예제를 살펴보죠. Microsoft와 Sony 주식 수익률에 동일한 가중치를 주려면 어떻게 할까요? 즉, Microsoft에 50%, Sony에 50% 투자하려는 상황입니다.

ret <- c(7, 9)

weight <- .5

ret_X_weight <- ret * weight

ret_X_weight

[1] 3.5 4.5

ret는 길이가 2인 벡터이고, weight는 길이가 1인 벡터예요. R은 weight의 .5를 두 번 재사용해 ret과 길이를 맞춘 다음, 원소별 연산을 수행합니다.

3개 주식의 수익률이 들어 있는 이름 있는 벡터 ret가 작업 공간에 있어요.
3개 주식의 수익률을 확인하려면 ret를 출력하세요.
각 주식에 부여할 가중치로 1/3 값을 weight에 할당하세요.
ret과 weight를 곱해 ret_X_weight를 만드세요. R이 weight를 어떻게 재활용하는지 보이시죠?
sum()을 사용해 ret_X_weight를 합산하여 동일 가중 portf_ret를 만드세요.
길이 3인 벡터와 길이 2인 벡터를 곱하는 마지막 코드 줄을 실행하세요. R은 길이 2 벡터의 첫 번째 값을 재사용하지만, 경고 메시지에 주의하세요!