Otomatik yüzeyleme (faceting)

Önceki egzersizde yüzeyli (faceted) bir saçılım grafiğini elle oluşturmuştun. Yalnızca iki grupla ilgilendiğin için bu çok zahmetli değildi. Ancak vgsales2016 veri kümesinde 6 platform var ve 6 saçılım grafiğini elle kodlamak epey yorucu olurdu.

Bu egzersizde, aşağıdaki şablonu kullanarak yüzeyli bir saçılım grafiğini otomatikleştirmek için group_by(), nest(), mutate() ve map2() kullanmayı pratik edeceksin:

data %>%
  group_by(factor) %>%
  nest() %>%
  mutate(
      plot = map2(data, factor,
        \(data, factor) 
            plot_ly(data = data, x = ~x, y = ~y) %>%
                  add_markers(name = ~factor)
    )) %>%
  subplot(nrows = R, shareY = TRUE, shareX = TRUE)

Bu egzersiz

R ile plotly kullanarak Etkileşimli Veri Görselleştirme

kursunun bir parçasıdır

Kursu Görüntüle

Egzersiz talimatları

group_by(), nest(), mutate() ve map2() kullanarak x ekseninde Critic_Score, y ekseninde User_Score olan ve yüzeylerin Platform ile belirlendiği bir yüzeyli saçılım grafiği oluştur.
Yüzeyleri 3 satırlı bir ızgarada yerleştir.

Uygulamalı interaktif egzersiz

Bu örnek kodu tamamlayarak bu egzersizi bitirin.

# Create a faceted scatterplot of User_Score vs. Critic_Score with 3 rows
vgsales2016 %>%
  ___(___) %>%
  ___() %>%
  mutate(
    plot = ___(
      ___, ___,
      \(data, Platform) 
      	
    )) %>%
  subplot(nrows = ___, shareY = TRUE, shareX = TRUE)

Kodu Düzenle ve Çalıştır