Альтернативный код вектора денежных потоков
В предыдущем примере вы могли задать вектор денежных потоков следующим образом: cf <- c(3, 3, 3, 3, 3, 3, 3, 103).
Однако такой подход может показаться немного утомительным. Альтернативный вариант — использовать команду rep(). Вызов rep(x, y) автоматически повторяет x ровно y раз. Например, rep(1, 4) равносильно записи c(1, 1, 1, 1).
В этом упражнении вы создадите более универсальную функцию для вычисления вектора денежных потоков на основе набора входных параметров: r — купонная ставка, p — номинальная стоимость, ttm — срок до погашения. Для этого вы воспользуетесь командой rep().
Это упражнение является частью курса
Оценка и анализ облигаций на R
Инструкции к упражнению
- Напишите альтернативную функцию для вычисления денежных потоков с использованием
rep()и входных переменныхr,pиttm. Сохраните эту функцию под именемalt_cf. - Используйте
alt_cf, чтобы сгенерировать вектор денежных потоков с купонной ставкой (r) 3% (0.03), номинальной стоимостью (p) $100 и сроком до погашения (ttm) 8 лет.
Интерактивное практическое упражнение
Попробуйте выполнить это упражнение, дополнив этот пример кода.
# Code cash flow function
alt_cf <- function(r, p, ttm) {
c(rep(p * r, ___ - 1), ___ * (1 + ___))
}
# Generate cf vector
alt_cf(r = ___, p = ___, ttm = ___)