shiny app for beta distribution