Verwenden von Alert von JavaScript (D3r) zum Übergeben von Daten an R

Question

Ich muss Daten vom Sunburst-Diagramm an R (Server-Seite) übergeben. Der folgende Code erstellt einen Sunburst-Plot und gibt auf der von Ihnen ausgewählten Ebene (mit freundlicher Genehmigung von Kerry und seiner großartigen Arbeit mit HTMLWidgets und SunburstR) Aufschluss. Ich möchte diese Informationen weitergeben, damit ich eine Download-Liste erstellen kann.

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

Verwendung:

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

dann können Sie

input$val 

auf Server-Seite verwenden, die Sie den Wert d gibt.