Ceny aktiv vs. výnosy aktiv

Cílem investování je dosáhnout zisku. Výše zisku nebo ztráty závisí na investované částce a změnách cen – klíčový ukazatel je přitom výnos vzhledem k velikosti investice. Přesně to měří finanční výnosy aktiv: změnu ceny jako podíl počáteční ceny za dané časové období, například jeden obchodní den.

Podívejme se znovu na dataset eu_stocks. Obsahuje hodnoty indexů, které můžeme chápat jako ceny. Samotné indexy sice nejsou investovatelná aktiva, ale existuje řada investovatelných nástrojů, jako jsou podílové fondy a ETF, které hlavní tržní indexy věrně kopírují.

V analýze finančních časových řad se běžně využívají také logaritmické výnosy, označované jako průběžně složené výnosy. Jsou to logaritmy hrubých výnosů, neboli změny (první diference) logaritmů cen.

Vizuální rozdíl mezi denními cenami a denními výnosy bývá výrazný, zatímco rozdíl mezi denními výnosy a logaritmickými výnosy je zpravidla malý. Jedna z výhod logaritmických výnosů, které uvidíš později, spočívá ve snadném výpočtu vícaperiodových výnosů – stačí je sečíst!

V tomto cvičení prozkoumáš dataset eu_stocks podrobněji: vykreslíš ceny, převedeš ceny na (čisté) výnosy a také na logaritmické výnosy.

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

Analýza časových řad v R

Zobrazit kurz

Pokyny k cvičení

Pomocí plot() vykresli data eu_stocks.
Použij předpřipravený kód pro převod denních cen z datasetu eu_stocks na denní čisté výnosy returns.
Pomocí ts() převeď returns na objekt ts. Nastav argument start na c(1991, 130) a argument frequency na 260.
Dalším voláním plot() zobraz denní čisté výnosy.
Použij předpřipravený kód kombinující diff() a log() pro výpočet logreturns.
Posledním voláním plot() zobraz denní logaritmické výnosy.

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

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

# Plot eu_stocks


# Use this code to convert prices to returns
returns <- eu_stocks[-1,] / eu_stocks[-1860,] - 1

# Convert returns to ts
returns <- ts(___, start = c(___, ___), frequency = ___)

# Plot returns


# Use this code to convert prices to log returns
logreturns <- diff(log(eu_stocks))

# Plot logreturns

Upravit a spustit kód