textInput("name", "What is your name?") actionButton("greet", "Greet") textOutput("greeting")
output$greeting <- renderText({ shiny::req(input$greet) paste0("Hello ", shiny::isolate(input$name), "!") })
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.