devtools::install_github("mgahan/SeatGeekR")
library(SeatGeekR)
A R package that allows the user to scrape ticket information from the Seatgeek API
exampleOutput <- seatgeek_extract_slug(TEAM_NAME="nebraska-cornhuskers-football")
kable(exampleOutput[, .(title, stats.average_price, stats.highest_price, stats.listing_count, stats.lowest_price)])
title
stats.average_price
stats.highest_price
stats.listing_count
stats.lowest_price
Northwestern Wildcats at Nebraska Cornhuskers Football
100
601
1127
32
Nebraska Cornhuskers at Minnesota Golden Gophers Football
161
347
803
90
Nebraska Cornhuskers at Penn State Nittany Lions Football
208
1473
1376
98
Iowa Hawkeyes at Nebraska Cornhuskers Football
173
711
1560
65
Purdue Boilermakers at Nebraska Cornhuskers Football
209
216
3
204
Illinois Fighting Illini at Nebraska Cornhuskers Football
209
216
3
204
Before accessing the API, you must visit the SeatGeek API and create your credentials here;
https://seatgeek.com/account/develop
Seatgeek makes it pretty easy to get your credentials. Also, as of this time, Seatgeek does not really seem to have limits on their API.
Right now, this package has the main functionality of being able to search by team name. In the future, I hope to allow the app to search by more. I do have a list of teamnames available for those interested.
fpath <- system.file("Teams", "Team_Slug_Names.csv", package="SeatGeekR")
TeamNames <- fread(fpath)
kable(tail(TeamNames))
Sport
Team
Conference
Division
NCAA Football
missouri-tigers-football
SEC
East
NCAA Football
ole-miss-rebels-football
SEC
West
NCAA Football
south-carolina-gamecocks-football
SEC
East
NCAA Football
tennessee-volunteers-football
SEC
East
NCAA Football
texas-a-m-aggies-football
SEC
West
NCAA Football
vanderbilt-commodores-football
SEC
East
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.