如何在存储在 R 列表中的数据框中创建一列指数?