set_service_token()现在已弃用.

改为使用bq_auth():

bq_auth(path = "location_of_service_token.json")

来源: https://rdrr.io/cran/bigrquery/man/bigrquery-deprecated.html