พ่อมดแห่ง NRC

มาถึงตัวสุดท้ายแล้ว นั่นคือ NRC lexicon ซึ่งจัดหมวดหมู่คำตามสถานะอารมณ์หลายมิติ จำ Plutchik's wheel of emotion ได้ไหม? NRC lexicon แท็กคำตาม 8 อารมณ์ของ Plutchik บวกกับป้ายกำกับ positive/negative

ในแบบฝึกหัดนี้มีตัวดำเนินการใหม่คือ %in% ซึ่งใช้จับคู่เวกเตอร์หนึ่งกับอีกเวกเตอร์หนึ่ง ในโค้ดด้านล่าง %in% จะคืนค่า FALSE, FALSE, TRUE เพราะใน some_vec นั้น 1 และ 2 ไม่พบใน some_other_vector แต่ 3 พบ จึงคืนค่า TRUE ตัวดำเนินการ %in% มีประโยชน์มากสำหรับการค้นหาค่าที่ตรงกัน

some_vec <- c(1, 2, 3)
some_other_vector <- c(3, "a", "b")
some_vec %in% some_other_vector

อีกตัวดำเนินการหนึ่งคือ ! ซึ่งใช้กับเงื่อนไขตรรกะเพื่อกลับผลลัพธ์ ในตัวอย่างข้างต้น FALSE, FALSE, TRUE จะกลายเป็น TRUE, TRUE, FALSE เมื่อใช้ร่วมกับ %in% จะช่วยกรองรายการที่ตรงกันออกได้

!some_vec %in% some_other_vector

เราได้เตรียม oz ซึ่งเป็นเวอร์ชัน tidy ของ The Wizard of Oz และ nrc ที่บรรจุ lexicon "NRC" พร้อมคอลัมน์ที่เปลี่ยนชื่อแล้วไว้ให้แล้ว

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

การวิเคราะห์ความรู้สึกใน R

ดูคอร์ส

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

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

oz_plutchik <- oz %>% 
  # Join to nrc lexicon by term = word
  inner_join(___, by = ___("___" = "___")) %>% 
  # Only consider Plutchik sentiments
  ___(!___ %in% c("___", "___")) %>%
  # Group by sentiment
  ___(___) %>% 
  # Get total count by sentiment
  ___(total_count = ___(___))

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