An example application using the shiny library in R