删除R中字符串中的中间0

我试图删除R中字符串中的零。我在一个帧中有一个列必须与另一个匹配，但一个有一个0，一个没有。 比如说,

A01对A1

当我有10个。。。A12

---

我已经搜索过了，但是如果没有在excel文件中进行复制和粘贴，我想不出该怎么做

我们可以使用

sub

sub("A0", "A", c("A01", "A10"))
#[1] "A1"  "A10"

或者更确切地说

sub("([A-Z])0(.*)", "\\1\\2", c("A01", "A10"))
#[1] "A1"  "A10"

---

更精确的一个有效，因为我有A1:G12。完美的