R语言数据分析案例39-合肥市AQI聚类和多元线性回归