총 수익 계산 (3)

이전 분석을 보면 좋은 날과 나쁜 날이 섞여 있었네요. 자존심은 예상하지 못했겠지만, 혹시 일주일 전체로는 아주 조금이라도 손해를 봤을 가능성이 있을까요?

이 질문에 답하는 데 유용한 함수가 sum()입니다. 이 함수는 벡터의 모든 원소 합을 계산합니다. 예를 들어 포커에서 잃거나 번 돈의 총액을 계산하려면 다음과 같이 합니다:

total_poker <- sum(poker_vector)

룰렛에서 잃거나 번 돈의 총액을 계산해 변수 total_roulette에 할당하세요.
이제 룰렛과 포커의 총액이 있으니, 쉽게 total_week(일주일 동안의 모든 수익과 손실의 합)을 계산할 수 있습니다.
total_week을 출력하세요.