Final project of shiny apps