Remove specific last character from string

Question

I have following string vector:

 EC02   502R   603           515    602   
 KL07   601    511R   505R   506R   503   
 508    514    501    509R   510    50         


        

Answer 1

lapply( dfrm, function(col_) {gsub( "R","",col_)} )

Answer 2

If you have a string vector and want to replace the last R character from it you can use sub. $ here ensures that the R is the last character in your vector.

sub("R$", "", str)

#[1] "EC02"  "502"   "603"   "5RFRS"

data

str <- c("EC02", "502R","603", "5RFRS)

I have used sub here instead of gsub. sub replaces only first occurrence of the pattern whereas gsub replaces all occurrences of the pattern though in this case the usage of sub/gsub wouldn't matter.