timelyportfolio
commented
7 years ago Changes in 0.6.3
In 0.6.3, sunburst changed to use d3r for the d3 dependency, but this did not seem to affect any shiny examples that I tried. Can you try?
library(shiny)
library(sunburstR)
library(htmltools)
# 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)
ui <- htmlOutput("sb")
server <- function(input, output, session) {
output$sb <- renderUI(tagList(sb))
}
shinyApp(ui, server)Errors in JavaScript console
Would you be able to open your broken example in Chrome/Firefox/Safari to inspect the JavaScript console for errors? Usually, F12 or CTRL + Shift + J will open the debugger window.
Better Way?
I thought I would add some thoughts on a better way to approach your objective, by using the add_shiny() function and rendering your UI/HTMLoutput separately from the sunburst chart. See shiny example for an illustration. Happy to help work through this if you like the idea.
tyjselina
Based on this http://timelyportfolio.github.io/sunburstR/example_baseball.html example (use sunburst event), I want to wrapped it into an interactive shiny app (the click on within an interactive shiny app). What I did previously is put the (browsable function/tagList) into the renderUI function,
`output$sunburst = renderUI({tagList( sb, tags$div(id="games", style="margin-top:100px"), tags$script(HTML( sprintf( ' var action = %s;
function mouseovered(d){ var games = action.filter(function(evt){ return evt.event === d.join("-"); });
var div = document.getElementById("games"); div.innerHTML = games.map(function(game){ return [ "<a href=\'http://gd2.mlb.com/components/game/mlb/year_2016/month_08/day_25/", game.gameday_link, "\'>", game.gameday_link, "
" ].join(""); }).join("\n"); } ', jsonlite::toJSON(action, auto_unbox=TRUE, dataframe="row") ) )) )})`
It works fine. But after I updated the sunburst package from 0.6.2 to 0.6.3, the generated sunburst chart is not shown up in the app. So I am wondering which parts has change resulting in the in-compatible of browsable/sunburst with renderUI
My current shiny version is shiny_0.14, R and R studio version is 3.3.2 and 0.99.902
Many thanks