如何为R数据帧中的因子变量的每个级别选择第一行?