Initial Shiny App codes and data set