我有一对辅助输入,允许用户从一组选项中选择组合。此外,能够删除之前创建的项目也很方便。
对于此任务,一个以reactiveValues对象形式存在的命名列表listN <- reactiveValues()将负责存储这些信息。
添加项目的功能就像一个魅力,但是当我尝试从中删除项目时listN,它的项目名称永远存在!
我的策略是使用reactiveValuesToList()、操作其项目并替换listN为reactiveValues()(或do.call(reactiveValues, listN_as_list).
我在 Gist 存储了一个可复制的应用程序。我希望这足以让你们帮助我。如果需要,请坚持提供更多说明。
网址:
gist.github.com/d43e72959c4576d27535
在控制台上运行的代码:
shiny::runGist('d43e72959c4576d27535')
提前致谢!
背景:在我的应用程序中,我构建了一个弹出模式,其中用户可以定义变量/参数,然后在按下时将它们存储在 areactiveValues()中actionButton。这看起来效果很好。
问题:我有一个单独的actionButton,应该清除/清空保存reactiveValues上面输入的内容。不幸的是,这似乎不起作用——也就是说,按下按钮没有任何作用。
最小可重复代码:
library(DT)
# UI modules
sidebarCharts <- function(id) {
ns <- NS(id)
tagList(
p(),
actionButton(ns("settings"), "Settings",
icon = icon("cogs"),
width = '100%',
class = "btn btn-info"),
p(),
actionButton(ns("refreshMainChart") ,"Refresh",
icon("refresh"),
width = '100%',
class = "btn btn-primary"),
p(),
textOutput(ns("info")) # FOR DEBUGGING
)
}
mainChartUI <- function(id) {
ns <- NS(id)
plotOutput(ns("mainChart"), width = "100%")
}
# UI module for the 2 buttons in the modal:
modalFooterUI …Run Code Online (Sandbox Code Playgroud)