如果某些列在 R 数据框中是分类的,如何找到列中每个值的余弦?