Menurunkan hujan (titik data)

Peningkatan bimodalitas yang kita lihat di awal pekan memang bisa jadi meyakinkan, tetapi sebaiknya kita menggambar titik-titik individual di bawah kurva densitas agar mendapat gambaran tentang apa yang dilakukan KDE dalam hal interpolasi sebelum kita menyimpulkan.

Pada kode dari latihan sebelumnya telah ditambahkan geometri titik untuk tujuan ini. Anda akan melihat tampilannya kurang bagus. Untuk memperbaikinya kita akan melakukan beberapa hal…

Pertama, turunkan sedikit nilai alpha pada titik agar tumpang tindih terlihat. Kedua, ubah bentuk titik menjadi garis vertikal bergaya geom_rug() ('|').

Pada tahap ini, jika Anda menjalankan kodenya, Anda akan melihat titik-titik tersebut memotong bentuk densitas dengan canggung. Kita perlu mendorong sedikit tanda pias tersebut ke bawah sumbu-y. Untuk itu kita dapat menggunakan argumen position dan fungsi bantu position_nudge().

Latihan ini adalah bagian dari kursus

Praktik Terbaik Visualisasi di R

Lihat Kursus

Petunjuk latihan

Turunkan alpha titik menjadi 0.2 agar tumpang tindih terlihat.
Ubah shape garis menjadi '|' untuk pemanfaatan ruang yang lebih efisien.
Dorong titik-titik ke bawah agar tidak tumpang tindih dengan bentuk densitas menggunakan position = position_nudge(y = -0.05).

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

md_speeding %>% 
    mutate(day_of_week = factor(day_of_week, levels = c("Mon","Tues","Wed","Thu","Fri","Sat","Sun") )) %>% 
    ggplot(aes( x = percentage_over_limit, y = day_of_week)) + 
    geom_point(
        # make semi-transparent with alpha = 0.2
        # turn points to vertical lines with shape = '|'
        # nudge the points downward by 0.05
    ) +
    geom_density_ridges(bandwidth = 3.5, alpha = 0.7) +
    scale_x_continuous(limits = c(0,150), expand  = c(0,0)) +
    labs(subtitle = 'Guassian kernel SD = 3.5') +
    theme( axis.ticks.y = element_blank() )

Edit dan Jalankan Kode