UI
textOutput()
server
renderText()
textOutput(outputId = "text")
output$text <- renderText(paste0("Selected species is ", input$iris_species))
textOutput(outputId = "text")
output$text <- renderText(paste0("Selected species is ", input$iris_species))