shiny
htmltools
req()
seq()
on.exit()
observe()
isolate
observeEvent
eventReactive
reactiveTimer()
invalidateLater(ms)
git
x <- reactiveVal(1)
x <- reactiveValues(a = 1, b = 2)
x()
x$a
x(2)
x$a <- 2