documentation/snippets/justgageshiny.md

Contact Rate

renderGauge({
  rate <- computeContactRate(input$region)
  gauge(rate, min = 0, max = 100, symbol = '%', gaugeSectors(
    success = c(80, 100), warning = c(40, 79), danger = c(0, 39)
  ))
})


genpack/promer documentation built on Jan. 26, 2025, 11:30 p.m.