Updates to sampling shiny app