13. Action Button in R Shiny for controlled reactivity