sub命令提取数据和拆分数据框列

Question

尝试从数据框中提取数据 示例列：

Second
Daughter (Birth)
No Relation
Son (Adopted)

所需的输出（两列）：

Data1            Data2
Daughter        (Birth)
No relation
Son             (Adopted)

使用此命令但未获得结果：

as.data.frame(sub(".*\\w+[^)]*?(\\w+)\\).*", "\\1", test1$second))

感谢任何建议或帮助。