hclm={{-13,2571.04`},{-12,2598.04`},{-11,2624.66`},{-10,2651.08`},{-9,2676.72`},{-8,2701.99`},{-7,2726.67`},{-6,2750.97`},{-5,2774.88`},{-4,2798.03`},{-3,2820.59`},{-2,2842.57`},{-1,2863.79`},{1,2905.25`},{2,2924.92`},{3,2943.82`},{4,2962.14`},{5,2979.69`},{6,2996.66`},{7,3012.86`},{8,3028.67`},{9,3043.52`},{10,3057.98`},{11,3071.48`},{12,3084.21`},{13,3095.98`},{14,3131.85`},{15,3133.77`},{16,3135.7`},{17,3137.63`}}

<<LinearRegression`;

regresmodel=Regress[hclm,{1,m,m^2,m^3},m];
Chop[regresmodel,10^(-6)]