Normal Approximation of Binomial Data shiny app