Bagaimana dengan waffle?

Bagaimana jika kita tertarik pada rincian kelas 'other'?

Mari beralih ke waffle chart, karena jenis ini mampu menangani lebih banyak kelas. Kita akan menggunakan alur manipulasi data yang sama seperti pada latihan sebelumnya, tetapi kali ini dengan semua penyakit tetap disertakan.

Kita akan menggunakan pustaka waffle yang berisi fungsi waffle(). Fungsi ini membuat waffle chart untuk Anda ketika diberikan sebuah vektor bernama yang berisi jumlah kasus.

Fungsi ini akan menggambar satu kotak untuk setiap unit yang ada dalam vektor, sehingga kita perlu memanipulasi jumlah penyakit menjadi persentase yang dibulatkan (perhatikan pemanggilan mutate() dalam kode pengolahan data yang disediakan).

Latihan ini adalah bagian dari kursus

Praktik Terbaik Visualisasi di R

Lihat Kursus

Petunjuk latihan

Beri nama pada vektor case_counts menggunakan fungsi names().
Panggil fungsi waffle() dari pustaka waffle dengan menyertakan vektor case_counts sebagai argumen.

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

disease_counts <- who_disease %>%
group_by(disease) %>%
	summarise(total_cases = sum(cases)) %>% 
	mutate(percent = round(total_cases/sum(total_cases)*100))

# Create an array of rounded percentages for diseases.
case_counts <- disease_counts$percent
# Name the percentage array with disease_counts$disease
___

# Pass case_counts vector to the waffle function to plot
waffle(___)

Edit dan Jalankan Kode