queryString <- list(zip = zip_codes[1])
# Send GET request to retrieve crime data
response <- GET(url, add_headers("X-RapidAPI-Key" = API_Key, "X-RapidAPI-Host" = API_Host), query = queryString)
# Check for any errors in the response
warn_for_status(response)
Join in the discussion - add comment below: