googleCloudStorageR::gcs_auth：错误：非交互式会话且未选择身份验证电子邮件

Question

我想在 docker 中使用此功能来验证 Biq Query 和 Google Cloud Storage。

authenticate <- function() {
    scopes <- c("https://www.googleapis.com/auth/cloud-platform",
                'https://www.googleapis.com/auth/spreadsheets',
                'https://www.googleapis.com/auth/drive')
    token <- gargle::token_fetch(scopes = scopes)
    bigrquery::bq_auth(token = token)
    googleCloudStorageR::gcs_auth(token = token, token)
}

我将我的凭据从 ~/.config/gcloud/application_default_credentials.json 附加到 docker。 bq_auth 工作正常。如果我在 docker 之外运行该函数，它可以正常工作，但我必须交互式登录。

使用 docker，我会收到错误

Error: Non-interactive session and no authentication email selected.
         
Setup JSON service email auth or specify email in gar_auth(email='[email protected]')

即使我将电子邮件传递给 gcs_auth，它也不起作用（但是我想避免这种情况）。