R: Zero am Ende der alphanumerischen Zeichenfolge entfernen

Question

Ich möchte alle Nullen am Ende einer alphanumerischen Zeichenfolge entfernen.

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

Sollte ergeben:

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

du versuchen. $, um das Ende der Zeichenfolge und 0* mit mehreren Nullen übereinstimmen.

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