R语言读入数据后如何算均值