app code snippets in r

create a shiny app in r