I can’t understand why this error is returning

Question

Error in round(Transform(x), digits) : non-numeric argument to Mathematical Function

My code:

leaflet(br_munic) %>% addProviderTiles(providers$OpenStreetMap) %>% addPolygons(
      fill = T, stroke = F, fillColor = pal(br_munic@data$x),smoothFactor = 0.2, fillOpacity = 0.5, 
      label = paste0(br_munic@data$NOME_MUN, ": ", formatC(br_munic@data$x, big.mark = ","))) %>%  
      addLegend(pal = pal, values = br_munic@data$x, opacity = 1.0)
  }