JavaScript（D3r）からアラートを使用してデータをRに転送

Question

SunburstプロットからR（サーバー側）にデータを渡す必要があります。次のコードは、サンバーストプロットを作成し、選択したレベルでアラートを出します（ケリーと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); 
}); 

、あなたはあなたの値dを与えるサーバー側で

input$val 

を使用することができます。