5
Regex para remover zeros à esquerda em R, a menos que o caractere final (ou único) seja zero
gsub("(?<![0-9])0+", "", c("005", "0AB", "000", "0"), perl = TRUE) #> [1] "5" "AB" "" "" gsub("(^|[^0-9])0+", "\\1", c("005", "0AB", "000", "0"), perl = TRUE) #> [1] "5" "AB" "" "" A expressão regular acima é desse encadeamento SO, explicando como remover todos os zeros à esquerda de uma sequência em …