如何在 R 数据帧中找到 ID 明智的频率?