Sampling in shiny

minimal working version 0.3.1

code for calculation based on: https://rstudio-pubs-static.s3.amazonaws.com/98526_15da936c6bab41c6bc4ccd0fbbf2cfb1.html

code needs refactoring
css file needs refactoring
tables needs horizontal adjustments