如何将不同的函数应用于对 R 数据框中的值进行分组?