added codes for my shiny app