Remove leading 0s in an array of strings id <- c("00001","00010","00022","07432") as.character(as.integer(id)) [1] "1" "10" "22" "7432" sub("^0+", "", id) [1] "1" "10" "22" "7432"