Per title, I am looking for a way to remove the leading zero from both sides of the hyphen.
codes <- c("0002-01014", "0020-0014","0001
