Regresi logistik nonlinier

Pada bab 3, Anda menelusuri jarak yang ditempuh para komuter dan efek linear dari jarak tersebut terhadap probabilitas seseorang naik bus. Namun, bagaimana jika hubungan ini bersifat nonlinier dan nonmonotonik?

probitVsLogit

Sebagai contoh, bagaimana jika orang yang menempuh jarak terpendek dan terjauh justru lebih kecil kemungkinannya untuk naik bus? Anda dapat menambahkan suku nonlinier ke formula di R menggunakan fungsi I(..) sebagai bagian dari formula. Sebagai contoh, y~I(x^2) memungkinkan Anda mengestimasi koefisien untuk x*x. Dalam latihan ini, Anda akan menelaah data bus lebih lanjut.

Latihan ini adalah bagian dari kursus

Model Linear Tergeneralisasi di R

Lihat Kursus

Petunjuk latihan

Tambahkan formula y ~ I(x^2) ke opsi formula pada pemanggilan geom_smooth() yang kedua.

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

# Plot linear effect of travel distance on probability of taking the bus
gg_jitter <-
	ggplot(data = bus, aes(x = MilesOneWay, y = Bus2)) + 
	geom_jitter(width = 0, height = 0.05) + 
	geom_smooth(method = 'glm', 
                method.args = list(family = 'binomial'))

# Add a non-linear equation to a geom_smooth()
gg_jitter +
	geom_smooth(method = 'glm', 
                method.args = list(family = 'binomial'), 
                formula = ___, 
                color = 'red')

Edit dan Jalankan Kode