Как передать параметры в блестящее приложение по URL-адресу

В веб-браузерах вы передаете параметры на веб-сайт, например

www.mysite.com/?parameter=1

У меня есть блестящее приложение, и я бы хотел использовать параметр, переданный на сайт, в вычислениях в качестве ввода. Так можно ли сделать что-то вроде www.mysite.com/?parameter=1, а затем использовать параметр ввода!

Можете ли вы предоставить какой-либо образец кода или ссылки?

спасибо

Вам придется обновлять ввод самостоятельно, когда приложение будет инициализироваться на основе URL-адреса. Вы должны использовать переменную query session$clientData$url_search для получения параметров запроса. Вот пример, вы можете легко расширить это в своих потребностях

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

Создавая дааттали, это принимает любое количество входов и назначает вам значения для нескольких разных типов входов:

ui.R:

 library(shiny) shinyUI(fluidPage( textInput("symbol", "Symbol Entry", ""), dateInput("date_start", h4("Start Date"), value = "2005-01-01" ,startview = "year"), selectInput("period_select", label = h4("Frequency of Updates"), c("Monthly" = 1, "Quarterly" = 2, "Weekly" = 3, "Daily" = 4)), sliderInput("smaLen", label = "SMA Len",min = 1, max = 200, value = 115),br(), checkboxInput("usema", "Use MA", FALSE) )) 

server.R:

 shinyServer(function(input, output,session) { observe({ query <- parseQueryString(session$clientData$url_search) for (i in 1:(length(reactiveValuesToList(input)))) { nameval = names(reactiveValuesToList(input)[i]) valuetoupdate = query[[nameval]] if (!is.null(query[[nameval]])) { if (is.na(as.numeric(valuetoupdate))) { updateTextInput(session, nameval, value = valuetoupdate) } else { updateTextInput(session, nameval, value = as.numeric(valuetoupdate)) } } } }) }) 

Пример URL для тестирования: 127.0.0.1:5767/?symbol=BBB,AAA,CCC,DDD&date_start=2005-01-02&period_select=2&smaLen=153&usema=1

Давайте будем гением компьютера.