Zacznij terazZacznij za darmo

Porównanie rozkładu opłat według typu płatności

Wiemy już, że przy płatnościach gotówką napiwki nie są odnotowywane. Czy oznacza to, że osoby płacące gotówką nie zostawiają napiwków – czy też po prostu nie są one rejestrowane? Dla podobnych tras oczekujemy, że rozkład łącznej opłaty będzie identyczny niezależnie od metody płatności. W tym ćwiczeniu stworzysz wykres kwantylowy porównujący rozkład łącznej opłaty według typu płatności, a następnie zestawisz go z oryginalnym wykresem w osobnym panelu.

Przygotowano dla ciebie zbiór danych amount_compare zawierający zmienne payment_type, amount oraz amount_type. Zmienna amount_type rozróżnia wartości odzwierciedlające całkowitą opłatę od opłaty bez napiwku.

To ćwiczenie jest częścią kursu

Wizualizacja dużych zbiorów danych z Trelliscope w R

Zobacz kurs

Instrukcje do ćwiczenia

  • Przed przystąpieniem do ćwiczenia zapoznaj się ze zbiorem danych amount_compare, wyświetlając go w konsoli – pomoże ci to zrozumieć jego strukturę i ułatwi specyfikację wykresu.
  • Użyj geom_qq(), aby utworzyć wykres kwantylowy łącznej kwoty opłaty (amount). Pamiętaj, aby ustawić distribution = stats::qunif.
  • Zadbaj o to, by dla każdego typu płatności powstał osobny wykres kwantylowy – użyj argumentu color z podziałem według typu płatności, tak aby rozkłady nakładały się na jednym wykresie.
  • Porównaj rozkłady dla każdego amount_type, stosując faceting.

Interaktywne ćwiczenie praktyczne

Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.

library(ggplot2)
library(dplyr)
library(tidyr)

# Get data ready to plot
amount_compare <- tx_pop %>%
  mutate(total_no_tip = total_amount - tip_amount) %>%
  select(total_amount, total_no_tip, payment_type) %>%
  pivot_longer(!payment_type, names_to = "amount_type", values_to = "amount")

# Quantile plot
ggplot(___, aes(sample = ___, color = ___)) +
  geom_qq(distribution = ___, shape = 21) +
  facet_wrap(~ ___) +
  ylim(c(3, 20))
Edytuj i uruchom kod