In ThinkRstat/tagsinput: Bootstrap Tags input for Shiny

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  fig.path = "README-"
)

library(shiny)
ui <- fluidPage(
  tagsTextInput("fruits", "Fruits", "apple, banana"),
  textOutput("out")
)

server <- function(input, output){
  output$out <- renderPrint( strsplit( input$fruits, ",")[[1]] )
}

shinyApp( ui, server )

ThinkRstat/tagsinput documentation built on May 6, 2019, 6:03 p.m.