使用 url 在没有输入元素的闪亮应用程序中设置值

Question

我想制作一个闪亮的应用程序，从 url 中提取一个值，但不需要输入元素即可工作。例如。我知道我可以做到：

library(shiny)

shinyApp(
  ui = fluidPage(
    textInput("text", "Text", ""),
    textOutput("outtext")
  ),
  server = function(input, output, session) {
    output$outtext <- renderText(input$text)
    observe({
      query <- parseQueryString(session$clientData$url_search)
      if (!is.null(query[['text']])) {
        updateTextInput(session, "text", value = query[['text']])
      }
    })
  }
)

这会在 /?text=abc 之后从应用程序的 url 中提取，但我真正想要的是能够在没有 textInput 的情况下打印 url 中的值盒子。这可能吗？

Answer 1

是；直接渲染查询参数：

library(shiny)

shinyApp(
  ui = fluidPage(
    textOutput("outtext")
  ),
  server = function(input, output, session) {
    output$outtext <- renderText(getQueryString()[["text"]])
  }
)

使用 url 在没有输入元素的闪亮应用程序中设置值

Using url to set value in shiny app without input element

shiny