# Toy example: this will error quickly (no API token)
try(events <- getEvents(
matches = c(0, 1),
token = "invalid",
include_kpis = T,
include_set_pieces = F
))
# Real usage: requires valid Bearer Token from `getAccessToken()`
if (FALSE) {
events <- getEvents(
matches = c(84248, 158150),
token = "yourToken",
include_kpis = T,
include_set_pieces = F
)
}
Run the code above in your browser using DataLab