如何在R中的data.table对象列中分隔特定文本和剩余文本?