An R shiny project.