如何用数字替换 R 数据框的二分列中的单词?