알려진 수익률로 채권 현금흐름 할인하기

채권의 현금흐름을 정리했으니, 이제 각 현금흐름의 현재가치를 계산해 채권 가치를 구해 보겠습니다. 채권 가치는 각 현금흐름의 현재가치를 합한 값임을 기억하세요.

이번 연습 문제에서는 각 현금흐름에 대해 적절한 현재가치 계수 pv_factor를 계산해 각 현금흐름의 현재가치 pv를 구합니다. 그런 다음 pv를 모두 합해 채권의 가치를 계산합니다.

이 채권의 수익률은 6%이며, 이는 할인율로 사용됩니다. 이전 연습 문제에서 만든 데이터 프레임 cf가 작업 공간에 준비되어 있습니다.

cf 데이터 프레임에 새 열 t를 만들어 현금흐름이 수취되는 연도를 표시하세요. 여기서는 연도가 데이터 프레임의 행 이름(1, 2, 3 등)과 같습니다. 따라서 rownames()로 t를 지정하면 됩니다. 값이 숫자형이 되도록 as.numeric()을 사용하세요.
또 다른 새 열 pv_factor를 cf 객체에 만들어 각 연도의 현재가치 계수를 저장하세요. 각 연도의 현재가치 계수는 1을 1 + 수익률(여기서는 6%, 즉 0.06)의 t 제곱으로 나눈 값으로 계산합니다.
cf에 pv 열을 만들어 각 연도의 현금흐름 현재가치를 저장하세요. 현재가치는 현금흐름(cf)에 그 연도의 현재가치 계수(pv_factor)를 곱해 계산합니다.
마지막으로 sum()을 사용해 pv의 값을 합산하여 채권 가치를 구하세요.