a simple example of what Shiny if for