if (FALSE) {
# Load packages required:
library(RSelenium)
# Provide the day and game code:
day <- "24"
game_code <- "103170"
# Open an Internet server:
rD <- rsDriver(browser = "firefox", chromever = NULL)
# Follow this procedure on the server:
# 1. Copy and paste the game link https://jv.acb.com/es/103170/jugadas
# 2. Click on each period, starting with 1C.
# 3. Scroll down to the first row of data.
# 4. Go back to R and run the following code:
# Set the remote driver:
remDr <- rD$client
# Get the play-by-play data:
game_elem <- remDr$getPageSource()[[1]]
# Close the client and the server:
remDr$close()
rD$server$stop()
period <- "1C"
data_game <- do_process_acb_pbp(game_elem, day, game_code,
period, acb_shields, FALSE)
}
Run the code above in your browser using DataLab