我正在尝试制作一个带有3个下拉菜单的闪亮应用程序,可以选择一个变量。就我得到一个仪表板而言,该应用程序正在运行,但没有获得所需的输出。选择特定变量时,表或树的输出不会更改。
我正在通过添加新变量“ Year”来修改适用于两个变量的现有代码。我收到以下消息
”正在听 警告:最大值错误:参数的无效“类型”(列表) 96:可折叠树摘要 95:func [O:\ DIVISIONAL DRIVES \ Research / 2019] 82:origRenderFunc 81:输出图 1:runApp”
以下是我的服务器代码的一部分
observeEvent(input$reset_input,{
p <- NULL
output$plot <- renderCollapsibleTree({
dat <- data.1()
p <- collapsibleTreeSummary(
dat, hierarchy = c("Sector Area","Sub-sector Area"," Organisation"), root = "Framework", attribute = "Number of attempts", inputId = "node", zoomable = FALSE,
fillFun = colorspace::heat_hcl, fontSize = 11)
p
})
session$sendCustomMessage(type = "resetValue", message = "node")
})
还是其他呢?