lapply() na datovém rámci
Co kdybys místo seznamu měl/a datový rámec s akciovými výnosy – dalo by se stále použít lapply()? Ano! Možná překvapivě, datové rámce jsou pod pokličkou vlastně seznamy, takže lapply() aplikuje funkci na každý sloupec datového rámce.
df
a b
1 1 4
2 2 6
class(df)
[1] "data.frame"
lapply(df, FUN = sum)
$a
[1] 3
$b
[1] 10
lapply() sečetlo každý sloupec datového rámce, ale pořád platí jeho pravidlo: výsledkem je vždy seznam. K dispozici máš datový rámec denních akciových výnosů v desetinném vyjádření s názvem stock_return.
Toto cvičení je součástí kurzu
Intermediate R for Finance
Pokyny k cvičení
- Vypiš
stock_returna prohlédni si datový rámec. - Pomocí
lapply()zjisti průměr (mean) každého sloupce. - Vytvoř funkci pro výpočet Sharpeho poměru. Funkce by měla vzít průměr výnosů, odečíst od něj bezrizikovou sazbu (
.03 %) a výsledek vydělit směrodatnou odchylkou výnosů. - Pomocí
lapply()vypočítej Sharpeho poměr pro každý sloupec.
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
# Print stock_return
___
# lapply to get the average returns
___
# Sharpe ratio
sharpe <- function(returns) {
(___ - .0003) / ___
}
# lapply to get the sharpe ratio
___