A shiny app to demonstrate the CLT