Přidání další řady do existujícího grafu
Skvělý způsob, jak vizuálně porovnat dvě časové řady, je zobrazit je ve stejném grafu s různými škálami.
Předpokládejme, že už máš vykreslená data mydata. Jak jsi viděl/a ve videu, pomocí lines(mydata2) můžeš do tohoto grafu přidat novou časovou řadu mydata2. Pokud chceš pro tuto časovou řadu zobrazit škálu na pravé straně grafu s rovnoměrně rozmístěnými dělícími značkami, použij axis(side, at), kde side je celé číslo určující stranu grafu, na které se osa vykreslí, a at nastavíš na pretty(mydata2).
Aby bylo obě časové řady možné od sebe rozlišit, můžeš přidat legendu pomocí funkce legend(). Podívejme se na příklad z videa:
> # x určuje umístění legendy v grafu
> legend(x = "bottomright",
# legend určuje textové popisky
legend = c("Stock X", "Stock Y"),
# col určuje barvu/barvy
col = c("black", "red"),
# lty určuje typ/typy čáry
lty = c(1, 1))
Protože graf obsahuje dvě časové řady, některé parametry funkce legend() jsou nastaveny jako vektor délky dvě.
V tomto cvičení vytvoříš graf a legendu pro dvě časové řady. K dispozici máš stejný dataset data jako dříve.
Toto cvičení je součástí kurzu
Visualizing Time Series Data in R
Pokyny k cvičení
- Vykresli řadu "microsoft" a přidej název grafu "Stock prices since 2015"
- Přidej řadu "dow_chemical" do grafu jako červenou čáru pomocí
lines() - Přidej vhodně škálovanou osu Y na pravou stranu grafu pro data "dow_chemical" pomocí
axis()apretty() - Přidej vhodně barevnou legendu v pravém dolním rohu s názvy akcií a plnými čárami
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 the "microsoft" series
# Add the "dow_chemical" series in red
# Add a Y axis on the right side of the chart
# Add a legend in the bottom right corner