web-dev-qa-db-ja.com

文字列から特定の最後の文字を削除します

私は次の文字列ベクトルを持っています：

 EC02   502R   603           515    602   
 KL07   601    511R   505R   506R   503   
 508    514    501    509R   510    501R  
 512R   516    507    604    502    601R  
 SPK01  504    504R   ACK01  503R   508R  
 507R   ACK03  513    EC01   506    ECH01 
 ACK02  SPK02  509    511    512    505   
 KA01   RS01   510R   SKL01  SPK03  603R  
 602R   604R   513R   AECH01 ER03   AECH02
 RS02   514R   ER01   RH01   AR05   RH02  
 515R   ER02   M01

502R to 502, 501R to 501, 503R to 503などを置き換えたい...

文字列の最後にある文字Rのみを置き換える必要があります。

gsubでどうすればよいですか？

rregexgsub
7
Neil

文字列ベクトルがあり、そこから最後のR文字を置き換えたい場合は、subを使用できます。 $ここでは、Rがベクトルの最後の文字であることを確認します。

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

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

データ

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

ここでは、subの代わりにgsubを使用しました。 subはパターンの最初の出現のみを置き換えますが、gsubはパターンのすべての出現を置き換えますが、この場合はsub/gsubの使用は重要ではありません。 。

10
Ronak Shah
lapply( dfrm, function(col_) {gsub( "R","",col_)} )
2
42-