Build a sample

You may also use a dedicated shinyapp for this

kobo_shiny("app_sampling.R")