googleAnalyticsR 包无法将类型 'closure' 强制转换为类型 'character' 的向量

googleAnalyticsR package cannot coerce type 'closure' to vector of type 'character'

当我 运行 以下代码时,我没有看到任何错误,并且 Shiny 应用程序按预期呈现和执行。

library(shiny)
library(googleAuthR)

gar_set_client(scopes = c("htps://www.googleapis.com/auth/analytics.readonly"))

library(googleAnalyticsR)

ui <- fluidPage(
  googleAuth_jsUI("auth")
  )

server <- function(input, output, session) {
}

shinyApp(ui = ui, server = server)

但是,当我 运行 后来的迭代中添加了 auth 模块时,我得到了一个强制错误

library(shiny)
    library(googleAuthR)

    gar_set_client(scopes = c("htps://www.googleapis.com/auth/analytics.readonly"))

    library(googleAnalyticsR)

    ui <- fluidPage(
      googleAuth_jsUI("auth")
      )

    server <- function(input, output, session) {

    auth <- callModule(gar_auth_js, "auth")


    }

错误:

2020-02-16 21:41:43> 
options(googleAuthR.scopes.selected=c('https://www.googleapis.com/auth/analytics.readonly'))
options(googleAuthR.client_id='xxx.apps.googleusercontent.com')
options(googleAuthR.client_secret='xxx')
options(googleAuthR.webapp.client_id='xxx.apps.googleusercontent.com')
options(googleAuthR.webapp.client_secret='xxx')

Listening on http://127.0.0.1:1221
Warning: Error in as.character: cannot coerce type 'closure' to vector of type 'character'
  58: sprintf
  57: gettextf
  56: .Deprecated
  55: module
  50: callModule
  49: server [/Users/xxx/xxx/xxx/app.R#60]
Error in as.character(function (input, output, session, message = "Authenticate with your Google account")  : 
  cannot coerce type 'closure' to vector of type 'character'

错误是由于弃用了: auth <- callModule(gar_auth_js, "auth")

必须使用以下内容。 auth <- callModule(googleAuth_js, "auth")