Gradient boosted trees: vizualizace
Teď máš k dispozici predikce modelu – a přirozeně tě zajímá, jak jsou přesné. Existuje mnoho grafů, které ti pomůžou vyhodnotit kvalitu predikcí. Tady se podíváš na dva nejběžnější. Nejprve je užitečné nakreslit bodový graf predikovaných hodnot oproti skutečným hodnotám, abys viděl/a, jak si navzájem odpovídají. Zadruhé by residua měla zhruba odpovídat normálnímu rozdělení, takže se hodí nakreslit graf hustoty residuí. Výsledné grafy by měly vypadat přibližně takto.

V tomto cvičení se naučíš sám/sama vypočítat residua (predikované hodnoty minus skutečné hodnoty) ze svých predikcí modelu.
Toto cvičení je součástí kurzu
Úvod do Sparku se sparklyr v R
Pokyny k cvičení
Lokální tibble responses obsahující predikované a skutečné roky je předem připravený.
- Nakresli bodový graf predikovaných hodnot oproti skutečným hodnotám.
- Zavolej
ggplot(). - Prvním argumentem je datová sada
responses. - Druhým argumentem mají být názvy sloupců pro osy x a y bez uvozovek (
actualapredicted), zabalené doaes(). - Přidej body voláním
geom_point(). - Nastav částečnou průhlednost bodů pomocí
alpha = 0.1. - Přidej referenční čáru voláním
geom_abline()s argumentyintercept = 0aslope = 1.
- Zavolej
- Vytvoř tibble residuí s názvem
residuals.- Zavolej
transmute()naresponses. - Nový sloupec pojmenuj
residual. residualmá být roven predikované hodnotě minus skutečná hodnota.
- Zavolej
- Nakresli graf hustoty residuí.
- Pošli transformovaný tibble rourou do
ggplot(). ggplot()potřebuje jedinou estetiku –residualzabalený doaes().- Přidej křivku hustoty pravděpodobnosti voláním
geom_density(). - Přidej svislou referenční čáru procházející nulou voláním
geom_vline()sxintercept = 0.
- Pošli transformovaný tibble rourou do
Interaktivní cvičení na vyzkoušení si v praxi
Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.
# responses has been pre-defined
responses
# Draw a scatterplot of predicted vs. actual
ggplot(___, aes(___, ___)) +
# Add the points
___ +
# Add a line at actual = predicted
___
residuals <- responses %>%
# Transmute response data to residuals
___
# Draw a density plot of residuals
ggplot(___, aes(___)) +
# Add a density curve
___ +
# Add a vertical line through zero
___