错误：shinyjs：extendShinyjs：必须提供`functions`参数答案

【问题标题】：Error : shinyjs: extendShinyjs: `functions` argument must be provided错误：shinyjs：extendShinyjs：必须提供`functions`参数
【发布时间】：2021-07-12 18:20:36
【问题描述】：

我对 Shiny 很陌生，所以这可能是一个直截了当的答案。数据可视化应用程序在我同事的计算机上正常运行（他使用旧软件包版本）。从我在网上收集的信息来看，我的问题似乎与闪亮库的更新有关（也许也有情节）。我想我需要重写这两条 extendShinyjs 行，但到目前为止我还没有找到方法。

o.ui <- fluidPage(theme = shinytheme("flatly"),
        useShinyjs(),
        extendShinyjs(text = "shinyjs.resetClick = function() { Shiny.onInputChange('plotly_click-graphic', 'null'); }"),
        extendShinyjs(text = "shinyjs.resetClick_leg = function() { Shiny.onInputChange('traces', 'null'); }"),
        # l.tweaks,

【问题讨论】：

标签： r r-plotly shinyjs

【解决方案1】：

通过如下更改代码，它现在正在运行！

jsCode <- "shinyjs.resetClick = function() { Shiny.onInputChange('plotly_click-graphic', 'null'); }"
jsCode2 <- "shinyjs.resetClick_leg = function() { Shiny.onInputChange('traces', 'null'); }"

o.ui <- fluidPage(theme = shinytheme("flatly"),
        useShinyjs(),
        #extendShinyjs(text = "shinyjs.resetClick = function() { Shiny.onInputChange('plotly_click-graphic', 'null'); }"),
        extendShinyjs(text = jsCode , functions = c("resetClick")),
        extendShinyjs(text = jsCode2 , functions = c("resetClick_leg")),
        #extendShinyjs(text = "shinyjs.resetClick_leg = function() { Shiny.onInputChange('traces', 'null'); }"),

【讨论】：