การรวมข้อมูลในแต่ละธีม
ก่อนหน้านี้ได้รวมตารางเพื่อเปรียบเทียบธีมต่าง ๆ แล้ว แต่ก่อนจะเปรียบเทียบ ควรรวมข้อมูลเพื่อทำความเข้าใจชิ้นส่วนในแต่ละธีมและสีของชิ้นส่วนเหล่านั้นเสียก่อน
ตารางที่สร้างไว้ก่อนหน้านี้ถูกโหลดไว้ให้แล้วในชื่อ inventory_sets_themes โดยกรองตามแต่ละธีม และบันทึกออบเจ็กต์ไว้เป็น batman และ star_wars
inventory_sets_themes <- inventory_parts_joined %>%
inner_join(sets, by = "set_num") %>%
inner_join(themes, by = c("theme_id" = "id"), suffix = c("_set", "_theme"))
batman <- inventory_sets_themes %>%
filter(name_theme == "Batman")
star_wars <- inventory_sets_themes %>%
filter(name_theme == "Star Wars")
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
การ Join ข้อมูลด้วย dplyr
คำแนะนำการฝึกหัด
- นับหมายเลขชิ้นส่วนและรหัสสีสำหรับชิ้นส่วนใน Batman และ Star Wars โดยถ่วงน้ำหนักด้วยจำนวน
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# Count the part number and color id, weight by quantity
batman %>%
___
star_wars %>%
___