Hangi aday en çok harcama yaptı?
Gördüğün gibi, Senato kampanyalarının çoğu 1 milyon \('ın altında, çok büyük bir kısmı ise 20 milyon \)'ın altında bağış topladı. Peki bu astronomik tutarları toplayan yarışlar hangileriydi? Histogramlar gözlemleri kovalara ayırdığı için tek tek adayları kolayca belirlemeyi zorlaştırır; bu soruyu keşfetmek için farklı bir grafik gerekir.
Görevin, 2018 seçim döngüsünde en çok para toplayan 15 Senato kampanyasının bir nokta grafiğini oluşturmaktır. Adayları kolayca tanımlayabilmek için hover bilgisini de özelleştirmen gerekiyor.
Önce grafiği oluşturmaya odaklan, ancak hover bilgisinin nasıl özelleştirildiğini mutlaka gözden geçir!
plotly'nin senin için zaten yüklendiğini unutma.
Bu egzersiz
R ile plotly kullanarak Etkileşimli Veri Görselleştirme
kursunun bir parçasıdırEgzersiz talimatları
- En üstteki 15 kampanya için, x ekseninde
receiptsve y eksenindestateolacak şekilde,statedeğişkenireceipts'a göre yeniden sıralanmış bir nokta grafiği (yani saçılım grafiği) oluştur. - Renkleri, Demokratları (
DEM) mavi ve Cumhuriyetçileri (REP) kırmızı gösterecek şekilde değiştir.
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
# Create a dotplot of the top 15 Senate campaigns
fundraising %>%
filter(office == "S") %>%
slice_max(receipts, n = 15) %>%
plot_ly(x = ___, y = ~fct_reorder(___, ___),
color = ~fct_drop(party),
hoverinfo = "text",
text = ~paste("Candidate:", name, "
",
"Party:", party, "
",
"Receipts:", receipts, "
",
"Disbursements:", disbursement)) %>%
add_markers(colors = ___(___, ___))