我的闪亮应用程序中有以下类型的代码。这不是确切的代码,只是为了给你一个想法。
'shinyUI(
radiobutton("radio_c"),
UIOUPUT("hub"),
datatableoutput("contacttable")
)
shiny server(
output$hub <- renderUI({
if(input$radio_c ==2){
hub_list <- sort(unique(df_customer$Hub))
}
selectInput("hub", "Hub", c("All", hub_list), selected = "All")
})
output$contacttable <- renderdatatable({
if(input$hub != "All"{
###database operations}
datatable()
)}'
代码工作正常,警告&#34;警告:if:参数长度为零&#34;时出错。在加载数据表之前,警告会出现在应用程序中,然后加载数据表。
我相信的原因是,当UI selectinput被更新时,数据表调用值并返回null,因此给出警告,但是一旦UI元素被更新,就会加载datatable并且一切都很好。但是我不希望在加载数据表之前显示警告。应该有一些方法可以说明只有在更新UI元素后才能加载数据表。
我很欣赏这里的任何想法。
谢谢