แผนที่แสดงการเปลี่ยนแปลงของอัตราการออกมาใช้สิทธิ์เลือกตั้ง

จากที่ได้เห็นไปแล้วว่าอัตราการออกมาใช้สิทธิ์เลือกตั้งเพิ่มขึ้นในเกือบทุกรัฐในการเลือกตั้งกลางวาระปี 2018 เมื่อเทียบกับปี 2014 ในแบบฝึกหัดนี้ ให้สร้างแผนที่แสดงการเปลี่ยนแปลงของอัตราการออกมาใช้สิทธิ์ระหว่างการเลือกตั้งกลางวาระทั้งสองครั้งนี้

ข้อมูลเฟรม turnout, dplyr และ plotly ถูกโหลดให้แล้ว

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

การสร้างกราฟิกแบบโต้ตอบด้วย plotly ใน R

ดูคอร์ส

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

ใช้ mutate() เพื่อเพิ่มคอลัมน์ change ลงใน turnout โดยคำนวณจากผลต่างของอัตราการออกมาใช้สิทธิ์ในปี 2018 (turnout2018) และปี 2014 (turnout2014)
ใช้ plot_geo() และ add_trace() เพื่อสร้าง choropleth map แสดงการเปลี่ยนแปลงของอัตราการออกมาใช้สิทธิ์แยกตามรัฐ โดย map change ไปที่ z และ state.abbr ไปที่ locations
จำกัดขอบเขตของแผนที่ให้แสดงเฉพาะ 'usa' โดยใช้ layout()

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

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

# Create a choropleth map of the change in voter turnout from 2014 to 2018
turnout %>%
  ___(___) %>%
  ___(locationmode = 'USA-states') %>%
  ___(___, ___) %>%
  ___(geo = ___)

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