R：提取括号内的字符串/数字以及方括号内的字符串序列

Question

我在将数据分成两列或三列时遇到了一些问题。

以下是字符串，我想处理下一列

station "Park Rd & Holmead Pl NW (31602)" 

我能做些什么把它分成两列：， 怎么可能

station address "Park Rd & Holmead Pl NW "    
station number 31602 

以类似的方式我分开以下字符串？

station "Park Rd & Holmead Pl NW (formerly 34th & Water St NW)" 

到：

station   "Park Rd & Holmead Pl NW"       
former station "34th & Water St NW" 

任何人谁是很好的正则表达式，请帮助我！

谢谢！

Answer 1

# question 1 
x <- "Park Rd & Holmead Pl NW (31602)" 
strsplit(x, "\\(|)$")[[1]] 

# question 2 
x <- "Park Rd & Holmead Pl NW (formerly 34th & Water St NW)" 
strsplit(x, "\\(formerly |)$")[[1]]