Shiny provides many basic inputs that map nicely to R's basic datatypes. However, there many instances where users may want a custom textInput that may or may not map consistent with a specific R datatype. For example, phone numbers, credit cards, and other formatted strings.

The Cleave.js library provides facilities for customizing text inputs.

shinyCleave wraps Cleave.js so that Shiny textInputs can be customized.

shinyCleave is only available on github at the moment.

devtools::install_github("carlganz/shinyCleave")

shinyCleave provides several additional inputs like phoneInput, and creditCardInput, as well as server-side control of Cleave.js.

Below is an example which users client side phoneInput and creditCardInput, and also sets a text input to only accept numerics, and to format them in the "wan"-style. The app also prints the credit-card type to the console as it is typed.

library(shiny)
library(shinyCleave)

ui <- fluidPage(
  includeCleave(),
  textInput("money","Money input"),
  phoneInput("phone","Phone input"),
  textInput("num", "Format numbers"),
  creditCardInput("card","Credit Card")
)

server <- shinyServer(function(input, output, session) {

  cleave(session, "#money", list(
    prefix = "$"
  ))
  
  cleave(session, "#num", list(
    numeral = TRUE,
    numeralThousandsGroupStyle= 'wan'
  ))
  
  observe({
    print(input$card_creditCard)
  })
  
})

shinyApp(ui=ui,server=server)