Thanks to SweetAlert for Bootstrap forked from Tristan Edwards non-Bootstrap SweetAlert. Purpose is to demonstrate how to use @RStudio htmltools to get interactive javascript in your R workflow/environment.
htmltools