如何在R中找到按日期分组的列的平均值?