替換數據幀 - 特殊模式

Question

假設我有一個數據幀：

dd<-data.frame(a=c("xtr","la casa x-tr","x-tr")) 

      a 
      xtr 
la casa x-tr 
     x-tr 

我怎麼能代替onlye的「XTR」 occurrencies與「XTR」。所以，最後的結果將是

  a 
      xtr 
la casa xtr 
     xtr 

Answer 1

我們可以使用sub

dd$a <- sub("(x)-(tr)$", "\\1\\2", dd$a) 
dd$a 
#[1] "xtr"   "la casa xtr" "xtr" 

如果只有一個單一的-，然後

sub("-", "", dd$a)