R图

R画图：

1.趋势线图

plot(赔付金额~降水量mm,a)

abline(lm(赔付金额~降水量mm,a),col='blue')

b=lm(赔付金额~降水量mm,a);b