R语言编写自定义描述统计计算函数、使用by函数计算不同分组（group）的描述性统计值(Descriptive statistics by group、样本个数、均值、标准差、峰度、偏度)