This is the code I'm using to render the sensor in flexdashboard using runtime: shiny :
`renderGauge({ select <- reactive({ input$select}) call_data_f <- pbrCalls_Data %>% filter(pbrCalls_Data$village==select()) sum_table <- round(sum(call_data_f$status_match,na.rm = TRUE)/sum(complete.cases(call_data_f$status_match))*100) gauge(sum_table, min = 0, max = 100, symbol = '%', gaugeSectors( success = c(75, 100), warning = c(40, 74), danger = c(0, 39) )) })`
When I knit locally, the sensor displays correctly, as shown below:
But after posting to shinyapps.io, I can only see 0,% age and 100, no gauge:
shiny flexdashboard shinyapps
Jonathan munene
source share