如何用R数据帧的字符列中的值的序列号创建列?