# \donttest{
### Harper
try(statcast_search(start_date = "2022-10-06",
end_date = "2022-10-16",
playerid = 547180,
player_type = 'batter'))
### Framber
try(statcast_search(start_date = "2022-10-06",
end_date = "2022-10-16",
playerid = 664285,
player_type = 'pitcher'))
### Daily
try(statcast_search(start_date = "2022-11-04",
end_date = "2022-11-06"))
# }
# \donttest{
try({
correa <- statcast_search_batters(start_date = "2016-04-06",
end_date = "2016-04-15", batterid = 621043)
daily <- statcast_search_batters(start_date = "2016-04-06",
end_date = "2016-04-06", batterid = NULL)
})
# }
# \donttest{
try({
x <- statcast_search_pitchers(start_date = "2016-04-06",
end_date = "2016-04-15", pitcherid = 592789)
daily <- statcast_search_pitchers(start_date = "2016-04-06",
end_date = "2016-04-06", pitcherid = NULL)
})
# }
Run the code above in your browser using DataLab