ค่าเฉลี่ยคำตอบแยกตามคำถาม

ตารางที่สร้างในแบบฝึกหัดที่แล้วได้ถูกโหลดไว้ให้แล้วในชื่อ tagged_answers ซึ่งสามารถใช้ตารางนี้เพื่อหาค่าเฉลี่ยจำนวนคำตอบที่แต่ละคำถามได้รับ

tagged_answers <- question_answer_counts %>%
    inner_join(question_tags, by = c("id" = "question_id")) %>%
    inner_join(tags, by = c("tag_id" = "id"))

ตัวแปรสำคัญในตารางนี้ได้แก่ n ซึ่งคือจำนวนคำตอบของแต่ละคำถาม และ tag_name ซึ่งคือชื่อของแต่ละแท็กที่เชื่อมกับคำถามนั้น

มาใช้ dplyr verb ที่คุ้นเคยเพื่อหาค่าเฉลี่ยจำนวนคำตอบของแต่ละคำถามกัน

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

การ Join ข้อมูลด้วย dplyr

ดูคอร์ส

คำแนะนำการฝึกหัด

รวมข้อมูลในตาราง tagged_answers โดยจัดกลุ่มตาม tag_name
สรุปข้อมูลจาก tagged_answers เพื่อหาจำนวน questions และ average_answers
เรียงลำดับคอลัมน์ questions ที่ได้จากมากไปน้อย

แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ

ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์

tagged_answers %>%
  # Aggregate by tag_name
  ___  %>%
  # Summarize questions and average_answers
  summarize(questions = ___,
            average_answers = ___) %>%
  # Sort the questions in descending order
  ___

แก้ไขและรันโค้ด