R：刪除字母數字字符串末尾的零字

Question

我想刪除字母數字字符串末尾的所有零。

dd<-data.frame(a = c("11234000", "000aa456000", "a2340", "00aa45000900")) 

應導致：

dd<-data.frame(a = c("11234", "000aa456", "a234", "00aa450009")) 

Answer 1

dd<-data.frame(a = c("11234000", "000aa456000", "a2340", "00aa45000900")) 
dd$a = gsub('0+$', '', dd$a) 

Answer 2

你可以試試這個。 $匹配字符串的末尾，並匹配多個零。

sub("0*$", "", dd$a) 
# [1] "11234"  "000aa456" "a234"  "00aa450009"