เปรียบเทียบการกระจายหลายชุดพร้อมกัน
กลับมาดู faceted plot ที่เคยสร้างไว้อีกครั้ง คราวนี้ใช้เทคนิคใหม่ที่เรียนมา เราจะเข้าใจความสัมพันธ์ในข้อมูลได้ดีขึ้นไหมด้วย plot ประเภทใหม่นี้?
โค้ดที่ให้มาสร้างกราฟแบบเดิมจากบทเรียนที่แล้ว ให้แก้โค้ดเพื่อใช้ violin plot แสดงความหนาแน่นแทน jitter plot ที่แสดงจุดข้อมูลแต่ละจุด เช่นเดียวกับแบบฝึกหัดก่อนหน้า ให้ลดความกว้างของ boxplot ลงเพื่อให้อยู่ภายใน violin plot เป็นส่วนใหญ่ และอย่าลืมเพิ่ม subtitle เพื่อบอกผู้ชมถึงความกว้างของ kernel ใน violin plot ด้วย
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
แนวทางปฏิบัติที่ดีที่สุดสำหรับการสร้างภาพข้อมูลใน R
คำแนะนำการฝึกหัด
- แทนที่
geom_jitter()ด้วยgeom_violin() - กำหนด
fill = 'steelblue'และค่าส่วนเบี่ยงเบนมาตรฐานของ kernel เป็น2.5สำหรับ violin geometry - ลดค่า
widthของgeom_boxplot()ให้เหลือ0.3 - เพิ่ม subtitle ว่า
Gaussian kernel width: 2.5
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
md_speeding %>%
ggplot(aes(x = gender, y = speed)) +
# replace with violin plot with kernel width of 2.5, change color argument to fill
geom_jitter(alpha = 0.3, color = 'steelblue') +
# reduce width to 0.3
geom_boxplot(alpha = 0) +
facet_wrap(~vehicle_color) +
labs(
title = 'Speed of different car colors, separated by gender of driver'
# add a subtitle w/ kernel width
)