如何将R数据框中的多列与以列名作为因子的列一起转换为单个数字列?