修复闪亮输入

Fix Shiny Input

我正在制作一个闪亮的应用程序,它采用 numericInput(size,...) 并显示具有 input$size 行的随机数数据框,然后将其保存为 csv。我正在寻找某种方法来防止应用程序的用户在提供后更改输入的号码。例如,如果用户看到数据框并想“哦,我不喜欢这些数字”,我想确保他们不能一直输入数字,直到他们得到他们想要的结果(无需关闭并重新打开应用程序) .有没有办法修复给出的第一个输入?非常感谢!

您可以结合使用 reactiveValueobserveEvent 以及参数 once = TRUE

这将允许只设置一次 reactiveValue。然后用户可以更改输入,但这不会影响应用程序的其余部分

size <- reactiveVal()
observeEvent(input$size,{
  size(input$size)
},
once = TRUE)

您可能需要查看参数 ignoreInitignoreNULL,具体取决于您启动 numericInput 的方式。