Originally I create this shiny interface that takes in a parameter \"company id\" and \"date\", but here we have a problem: most people dont know the companies we work with
You need to make the UI reactive. I haven't tested this (miss data for it too) but should work I think. In server.R add:
server.R
output$selectUI <- renderUI({ selectInput("partnerName", "Select your choice", searchResult()[,1] ), })
And in ui.R replace the selectInput with:
ui.R
htmlOutput("selectUI")