...I have different fields of SelectInput which are dynamically generated. I am trying to get choices of each SelectInput but failed like below:
input[[ paste0("FilterField","_",rowNumber)]]$choices
getting like: NA NA NA NA.
I have a created 4 selectInput's here, I want to get choices of first dropdown. Please help me on getting this.
library(shiny)
ui = fluidPage(
box(
uiOutput("InputUI"),
actionButton(
inputId = "ENTER",
style = "simple",
size = "sm",
label="Print Number of Choices in Console"
)
)
)
server = function(input, output) {
filterRow=reactiveValues(
CurrentRow=4
)
output$InputUI=renderUI({
box(
div(
selectInput(
inputId=paste("FilterField",1,sep = "_"),
label="",
choices=choices,
multiple=F,
selectize = F
)
),
div(
selectInput(
inputId=paste("FilterField",2,sep = "_"),
label="",
choices=choices,
multiple=F,
selectize = F
)
),
div(
selectInput(
inputId=paste("FilterField",3,sep = "_"),
label="",
choices=choices,
multiple=F,
selectize = F
)
),
div(
selectInput(
inputId=paste("FilterField",4,sep = "_"),
label="",
choices=choices,
multiple=F,
selectize = F
)
)
)
})
observeEvent(input$ENTER,{
print(input[[ paste0("FilterField","_",1)]]["choices"])
})
}
shinyApp(ui,server,options=list(launch.browser=F))
I have update latest code, please help on this.