shiny - Shinyapps.io に公開すると Flexdashboard Gauge がレンダリングされない

Question

これは、フレックスダッシュボードでゲージをレンダリングするために使用しているコードです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)
  ))
})`

ローカルで編むと、ゲージは次のように正しく表示されます。

しかし、shinyapps.io に公開した後、0、%age、および 100、ゲージなししか表示されません。