built the shiny app first draft