如何刪除r中括號內的字符

Question

我有一個data.table，其中必須命令一列，並且月份縮寫將其丟棄。我怎樣才能刪除括號內的月份縮寫？我嘗試了一堆gsub變體，但一直未能達到預期的效果。

這是列的樣子：

K (May 04) 
M (Jun 04) 
Q (Aug 04) 

而且我想它看起來像：

K (04) 
M (04) 
Q (04) 

或

K04 
M04 
Q04 

Answer 1

x <- c("K (May 04)", "M (Jun 04)", "Q (Aug 04)") 
gsub("\\([A-Z][a-z]{2} ", "(", x) 

或第二選項：

gsub(" \\([A-Z][a-z]{2} ([0-9]+))", "\\1", x)