Code for my Shiny App (part of the Cousera Data Science specialization)