通过URL GET方法在闪亮的数据表中选择行

通过URL GET方法在闪亮的数据表中选择行

问题描述:

有没有人看过一段代码被剪掉或者在文档中通过提交一些get参数来选择闪亮应用的数据表中的行?通过URL GET方法在闪亮的数据表中选择行

喜欢的东西http://mywebsite.com/shinyapp/?row=1&row=2

或者,如果有人能指出我的一些想法如何实现这一点。

浏览一下堆栈溢出之后,我找到一个简单的例子How do you pass parameters to a shiny app via URL,并根据我的需要进行了调整。

library(DT) 
library(shiny) 


ui <- bootstrapPage(
    h2("The mtcars data"), 
    textInput("text", "Text", ""), 
    DT::dataTableOutput("mytable") 
) 

server <- function(input, output, session) { 

    observe({ 
    query <- parseQueryString(session$clientData$url_search) 
    print(query) 
    if (!is.null(query[['text']])) { 
     text_string <- query[['text']] 
     DT::selectRows(mytable_proxy, as.numeric(text_string)) 
     updateTextInput(session, "text", value = text_string) 
    } 
    }) 

    output$mytable = DT::renderDataTable({mtcars}) 
    mytable_proxy = DT::dataTableProxy('mytable') 
} 

shinyApp(ui, server) 

所以通过执行应用程序,并在浏览器中打开它,我可以添加GET参数,而且我在文本字段中的号码,但该行不会被选中。 http://127.0.0.1:3010/?text=4(IP和端口可能与您的情况不同)。