如何在R数据框中找到同名列的行均值?