Zacznij terazZacznij za darmo

Wyodrębnianie weekendowych meczów

Po obliczeniu przydatnych wskaźników na podstawie danych Red Sox czas przyjrzeć się danym innych bostońskich drużyn sportowych. Zebrałeś(-aś) dodatkowe dane dotyczące New England Patriots (futbol amerykański), Boston Bruins (hokej) i Boston Celtics (koszykówka). Dane tych drużyn oraz obiekt redsox zostały połączone w jeden obiekt xts o nazwie sports, który zawiera informacje o wszystkich meczach rozegranych przez bostońskie drużyny w latach 2010–2015.

Zanim przejdziesz do dalszej analizy, chcesz podzielić dane na kilka potencjalnie przydatnych podzbiorów. Szczególnie interesujące może być skupienie się wyłącznie na meczach weekendowych bostońskich drużyn.

Aby zidentyfikować mecze według dnia tygodnia, skorzystaj z polecenia .indexwday(), które zwraca dzień tygodnia każdej obserwacji w obiekcie xts. Wartości mieszczą się w zakresie 0–6, gdzie niedziela to 0, a sobota to 6.

To ćwiczenie jest częścią kursu

Studium przypadku: analiza danych szeregów czasowych miasta w R

Zobacz kurs

Instrukcje do ćwiczenia

  • Zapoznaj się z poleceniami indeksowania w xts, wyodrębniając dzień tygodnia każdej obserwacji z danych sports za pomocą .indexwday(). Zapisz te wartości do zmiennej weekday i wyświetl pierwsze wiersze tego obiektu przy użyciu head().
  • Utwórz indeks weekendowych obserwacji, łącząc polecenie which() z dwoma wywołaniami .indexwday(). Celem jest wyodrębnienie wyłącznie dat przypadających w sobotę lub niedzielę. Zapisz ten indeks jako weekend.
  • Utwórz nowy obiekt xts (weekend_games) zawierający tylko mecze rozegrane w weekend. Użyj head(), aby wyświetlić pierwsze wiersze nowego obiektu weekend_games.

Interaktywne ćwiczenie praktyczne

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

# Extract the day of the week of each observation
weekday <- .indexwday(___)
head(___)

# Generate an index of weekend dates
weekend <- which(.indexwday(___) == ___ | .indexwday(___) == ___)

# Subset only weekend games
weekend_games <- sports[___]
head(___)
Edytuj i uruchom kod