如果某些列在 R 数据框中是分类的,如何找到列中位数?