看看有没有共线性，有的话用R 分步回归下，不行的话就用R影响影子法找出有影响的那几个偏离年度，然后在回归，实在不行的话对Y进行下变化什么log,1/y,消除齐次性。

不存在共线性，然后你的R影响影子法是什么？

> x1<-c(1500, 1500, 3300, 4200, 2000, 2500, 2300, 2500)
> x2<-c(5000, 4000, 3000, 2500, 2000, 2500, 3500, 3000)
> y<-c(96000, 95000, 95000, 94000, 90000, 92000, 95000, 94000)
> money<-data.frame(x1, x2, y)
> lm.reg<-lm(y~x1+x2, data=money)
> summary(lm.reg)
> influence.measures(lm.reg)
influence.measures(lm.reg)就是测影响因子的