# NOT RUN {
exampleGameday <- gameday(gameId = 'gid_2012_08_12_atlmlb_nynmlb_1')
# Display GameId
exampleGameday$gameId
# Summary of the different types fo game events for gameId = 'gid_2012_08_12_atlmlb_nynmlb_1'
summary(exampleGameday$ds$event)
plot(exampleGameday$ds)
# }
Run the code above in your browser using DataLab