javascript - 使用来自 JavaScript (D3r) 的警报将​​数据传递给 R

Question

我需要将数据从 Sunburst 图传递到 R（服务器端）。以下代码创建了一个旭日形图并在您选择的级别上发出警报（Kerry 的礼貌以及他在 HTMLWidgets 和 SunburstR 方面的出色工作）。我希望能够传递该信息，以便创建下载列表。

library(sunburstR)

# read in sample visit-sequences.csv data provided in source
#   https://gist.github.com/kerryrodden/7090426#file-visit-sequences-csv
sequences <- read.csv(
  system.file("examples/visit-sequences.csv",package="sunburstR")
  ,header = FALSE
  ,stringsAsFactors = FALSE
)

sb <- sunburst(sequences)

sb$x$tasks <- list(
  htmlwidgets::JS(
"
function(){
  //debugger;

  this.instance.chart.on('click',function(d){
    alert(d);
  });
}
"    
  )
)

sb

Answer 1

利用：

this.instance.chart.on('click',function(d){
    Shiny.onInputChange("val", d);
});

那么你可以使用

input$val

在服务器端，它为您提供价值 d。