Aan de slagGa gratis aan de slag

Weekendwedstrijden ophalen

Na het berekenen van een paar handige indicatoren uit je Red Sox-data is het tijd om een stap terug te doen en data van andere Bostonse sportteams te verkennen. Je hebt extra gegevens verzameld over de New England Patriots (football), de Boston Bruins (ijshockey) en de Boston Celtics (basketbal). De data voor deze teams zijn, samen met je redsox-data, samengevoegd tot één xts-object, sports, dat nu alle wedstrijden bevat die door sportteams uit de regio Boston zijn gespeeld van 2010 tot en met 2015.

Voordat je verdergaat met de analyse, wil je je data verfijnen tot een paar mogelijk nuttige subsets. Het kan vooral handig zijn om je uitsluitend te richten op weekend-wedstrijden van Bostonse teams.

Om wedstrijden te identificeren op basis van de dag van de week, gebruik je de opdracht .indexwday(), die je de weekdag van elke observatie in je xts-object geeft. Deze waarden lopen van 0–6, waarbij zondag gelijk is aan 0 en zaterdag aan 6.

Deze oefening maakt deel uit van de cursus

Casestudy: Tijdreeksgegevens van een stad analyseren in R

Cursus bekijken

Oefeninstructies

  • Oefen met de xts-indexeringsopdrachten door de weekdag van elke observatie in je sports-data op te halen met .indexwday(). Sla deze waarden op in weekday en bekijk de eerste paar rijen van dit object weekday met head().
  • Maak een index van weekendobservaties door which() te combineren met twee aanroepen van .indexwday(). Het doel is om alleen die datums te selecteren die op een zaterdag of een zondag vallen. Sla deze index op als weekend.
  • Maak een nieuw xts-object (weekend_games) met alleen wedstrijden die in een weekend vallen. Gebruik head() om de eerste paar rijen van je nieuwe object weekend_games te bekijken.

Praktische interactieve oefening

Probeer deze oefening eens door deze voorbeeldcode in te vullen.

# 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(___)
Code bewerken en uitvoeren