Začněte nyníZačněte zdarma

Alternativní kód vektoru peněžních toků

V předchozím příkladu jsi mohl/a vektor peněžních toků zapsat takto: cf <- c(3, 3, 3, 3, 3, 3, 3, 103).

To ale může být trochu zdlouhavé. Alternativou je použít příkaz rep(). Zápis rep(x, y) automaticky zopakuje hodnotu x celkem y krát. Například rep(1, 4) je ekvivalentní zápisu c(1, 1, 1, 1).

V tomto cvičení sestavíš obecnější funkci pro výpočet vektoru peněžních toků na základě série vstupních parametrů: r pro kuponovou sazbu, p pro nominální hodnotu a ttm pro dobu do splatnosti. K tomu využiješ příkaz rep().

Toto cvičení je součástí kurzu

Oceňování a analýza dluhopisů v R

Zobrazit kurz

Pokyny k cvičení

  • Pomocí rep() a vstupních proměnných r, p a ttm vytvoř alternativní funkci pro výpočet peněžních toků. Tuto novou funkci ulož jako alt_cf.
  • Pomocí alt_cf vygeneruj vektor peněžních toků s kuponovou sazbou (r) 3 % (0.03), nominální hodnotou (p) 100 $ a dobou do splatnosti (ttm) 8 let.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

# Code cash flow function
alt_cf <- function(r, p, ttm) {
  c(rep(p * r, ___ - 1), ___ * (1 + ___))
}

# Generate cf vector
alt_cf(r = ___, p = ___, ttm = ___)
Upravit a spustit kód