Předpověď přežití vrabců

V tomto cvičení budeš předpovídat pravděpodobnost přežití pomocí modelu přežití vrabců z předchozího cvičení.

Pamatuj, že při volání funkce predict() (docs) pro získání předpovězených pravděpodobností z modelu glm() musíš explicitně zadat, že chceš odpověď (response):

predict(model, type = "response")

Pokud to neuděláš, funkce predict() na modelu logistické regrese vrátí předpovězené log-odds události, nikoli pravděpodobnost.

Použiješ také funkci GainCurvePlot() (docs) pro vykreslení gain křivky z predikcí modelu. Pokud se gain křivka modelu blíží ideální ("wizard") gain křivce, model vrabce dobře seřadil – tedy předpověděl, že vrabci, kteří skutečně přežili, budou mít vyšší pravděpodobnost přežití. Argumenty funkce GainCurvePlot() jsou:

frame: datový rámec se sloupcem predikcí a sloupcem skutečných hodnot
xvar: název sloupce s predikcemi (jako řetězec)
truthVar: název sloupce se skutečnými výsledky (jako řetězec)
title: název grafu (jako řetězec)

GainCurvePlot(frame, xvar, truthVar, title)

Dataový rámec sparrow a model sparrow_model jsou předem načteny.

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

Supervised Learning in R: Regression

Zobrazit kurz

Pokyny k cvičení

Vytvoř v datovém rámci sparrow nový sloupec pred s predikcemi na trénovacích datech.
Zavolej GainCurvePlot() a vykresli gain křivku predikcí. Odvádí model dobrou práci při řazení vrabců podle toho, zda skutečně přežili?

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

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

# sparrow is available
summary(sparrow)

# sparrow_model is available
summary(sparrow_model)

# Make predictions
sparrow$pred <- ___

# Look at gain curve
___(___, ___, ___, "sparrow survival model")

Upravit a spustit kód