Simple Shiny App to see what do you do