如何使用服务帐号和bigrquery包进行认证？

Question

我已经能够使用与使用googleAuth和bigQueryR的服务帐户相关联的json文件进行身份验证。

# Load Packages
global.packages <- c("bigQueryR", "googleAuthR")

### Apply require on the list of packages; load them quietly
lapply(global.packages, require, character.only = TRUE, quietly = TRUE)

Sys.setenv("GCS_AUTH_FILE" = "json_file_location")

#Authenticate Google BQ
googleAuthR::gar_attach_auto_auth("https://www.googleapis.com/auth/bigquery",
                                  environment_var = "GCS_AUTH_FILE")

这样就行了，我可以开始使用bigQueryR的函数了。

现在假设我被限制为bigrquery包，我如何使用此包的服务帐户进行身份验证？

我已经查看了这里的文档，但一无所获：https://cran.r-project.org/web/packages/bigrquery/bigrquery.pdf

我在互联网上遇到的资源建议用bigQueryR包代替bigrquery。

例如，这个相关的堆栈溢出问题：Use bigrquery auth in shiny application。

但我需要仅在bigrquery中可用的函数。

Answer 1

set_service_token()现在已弃用。

请改用bq_auth()：

bq_auth(path = "location_of_service_token.json")

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

Answer 2

您可以使用bigrquery中的函数set_service_token()对bigQueryR中使用的相同服务JSON进行身份验证

library(bigrquery)

set_service_token("location-of-service.json")

来源：https://github.com/rstats-db/bigrquery/issues/22