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

Argumenty FUN

Funkce, kterou chceš aplikovat, může mít i další volitelné argumenty, které možná budeš chtít upravit. Podívej se na funkci percent_to_decimal(), která umožňuje zadat počet desetinných míst.

percent_to_decimal(5.4, digits = 3)
[1] 0.054

Při volání lapply() můžeš zadat pojmenované volitelné argumenty za argumentem FUN — budou předány funkci, kterou aplikuješ.

my_list
$a
[1] 2.444 3.500

$b
[1] 1.100 2.678 3.450

lapply(my_list, FUN = percent_to_decimal, digits = 4)
$a
[1] 0.0244 0.0350

$b
[1] 0.0110 0.0268 0.0345

V tomto cvičení rozšíříš svou funkci pro výpočet Sharpeho poměru tak, aby uživatel mohl zadat bezrizikovou sazbu jako argument, a pak ji použiješ spolu s lapply(). K dispozici máš datový rámec denních výnosů akcií jako desetinná čísla s názvem stock_return.

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

Intermediate R for Finance

Zobrazit kurz

Pokyny k cvičení

  • Rozšiř funkci sharpe tak, aby přijímala bezrizikovou sazbu jako volitelný argument. Výchozí hodnota by měla být .0003.
  • Použij lapply() na stock_return k výpočtu Sharpeho poměru, pokud je bezriziková sazba .0004.
  • Použij lapply() na stock_return k výpočtu Sharpeho poměru, pokud je bezriziková sazba .0009.

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

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

# Extend sharpe() to allow optional argument
sharpe <- function(returns, rf = ___) {
    (mean(returns) - ___) / sd(returns)
}

# First lapply()
___

# Second lapply()
___
Upravit a spustit kód