Tableau JavaScript API Shiny R 中的过滤函数

Question

我正在测试将 Tableau JavaScript API 集成到一个单页闪亮的应用程序中。我已成功呈现 Tableau Viz，但筛选功能不起作用。

这是我的代码：

library(shiny)
library(shinyjs)

shinyApp(

  ui = fluidPage(

useShinyjs(),

tags$head(tags$script(src="https://public.tableau.com/javascripts/api/tableau-2.min.js")),
 extendShinyjs(text='shinyjs.initializeViz = function(){
var placeholderDiv = document.getElementById("tableauViz");
  var url = "http://public.tableau.com/views/WorldIndicators/GDPpercapita";
  var options = {
  hideTabs: true,
  hideToolbar: true,
  onFirstInteractive: function () {
  workbook = viz.getWorkbook();
  activeSheet = workbook.getActiveSheet();
  }
  };
  viz = new tableau.Viz(placeholderDiv, url, options);
  }
shinyjs.filterSingleValue= function(filtername, value){
activeSheet.applyFilterAsync(
  filtername,
  value,
  tableau.FilterUpdateType.REPLACE);
  }  '),

titlePanel("Tableau JavaScript API in Shiny App"),

selectInput('region', 'Region: ', 
  c('The Americas', 'Europe', 'Middle East')), 
 tags$div(id = 'tableauViz')
  ),

 server = function(input, output, session){

    observeEvent(input$region, {
      js$filterSingleValue('Region', input$region)
      js$initializeViz()
    })
  } 
)

知道为什么吗？

Answer 1

终于找到出路了…… 由于某些原因，将JavaScript函数转换为shinyjs.function时，它只能识别一个参数，即在这种情况下通过删除第一个参数重写过滤函数：

shinyjs.filterSingleValue= function(value) {
activeSheet.applyFilterAsync(
'Region',
value, 
tableau.FilterUpdateType.REPLACE);
}

这应该可以解决问题。感谢所有为此花费宝贵时间的人...

Tableau JavaScript API Shiny R 中的过滤函数

Tableau JavaScript API filter function in Shiny R

javascript

r

tableau-api

shiny