如何根据另一个 R 数据框中的另一列分配数据框中的列值?