MulaiMulai sekarang secara gratis

Ekstrak pertandingan akhir pekan

Setelah menghitung beberapa indikator berguna dari data Red Sox Anda, kini saatnya meninjau dan menelusuri data dari tim olahraga Boston lainnya. Secara khusus, Anda telah mengumpulkan data tambahan tentang New England Patriots (sepak bola Amerika), Boston Bruins (hoki es), dan Boston Celtics (bola basket). Data untuk tim-tim ini, bersama dengan data redsox Anda, telah digabungkan ke dalam satu objek xts, sports, yang kini memuat data semua pertandingan yang dimainkan oleh tim olahraga area Boston dari 2010 hingga 2015.

Sebelum melakukan analisis lebih lanjut, Anda ingin memperhalus data menjadi beberapa subset yang berpotensi bermanfaat. Secara khusus, akan membantu jika berfokus hanya pada pertandingan akhir pekan yang melibatkan tim olahraga Boston.

Untuk mengidentifikasi pertandingan berdasarkan hari dalam seminggu, Anda harus menggunakan perintah .indexwday(), yang memberi tahu hari dalam seminggu dari setiap observasi dalam objek xts Anda. Nilai ini berkisar dari 0–6, dengan Sunday sama dengan 0 dan Saturday sama dengan 6.

Latihan ini adalah bagian dari kursus

Studi Kasus: Menganalisis Data Deret Waktu Kota di R

Lihat Kursus

Petunjuk latihan

  • Berlatih dengan perintah pengindeksan xts dengan mengekstrak hari dalam seminggu dari setiap observasi pada data sports Anda menggunakan .indexwday(). Simpan nilai ini ke weekday dan tampilkan beberapa baris pertama objek weekday tersebut menggunakan head().
  • Buat indeks observasi akhir pekan dengan menggabungkan perintah which() dengan dua pemanggilan .indexwday(). Tujuannya adalah mengekstrak hanya tanggal yang jatuh pada Saturday atau Sunday. Simpan indeks ini sebagai weekend.
  • Hasilkan objek xts baru (weekend_games) yang hanya memuat pertandingan yang jatuh pada akhir pekan. Gunakan head() untuk melihat beberapa baris pertama dari objek weekend_games baru Anda.

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

# 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(___)
Edit dan Jalankan Kode