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

我需要将数据从森伯斯特图传递到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

最佳答案

采用：

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

那么你可以使用

input$val

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