glm 模型如何处理训练后添加的未知因素水平?
What does a glm model do with unknown factor levels added after training?
我正在用一个特定因子变量拟合一个 glm 模型,其中的数据不包含我要应用该模型的数据中该变量的所有级别。可以忽略未知级别,因此无论模型为它们预测什么,我都不在乎,只要它将其余部分视为训练和应用程序数据中的级别相同即可。
由于应用程序数据中的未知因素水平会产生错误,我搜索了一种解决方法,并在此处找到了 @matt_k 提供的一个很好的解决方法:
"Factor has new levels" error for variable I'm not using
现在追加一个新级别仍然会给出警告信息:
In predict.lm(object, newdata, se.fit, scale = 1, type = ifelse(type == :
prediction from a rank-deficient fit may be misleading
所以我想知道到底发生了什么。我在一个非常简单的例子中尝试过,在 mpg
模型中省略了圆柱体 6
级别 mtcars
:
mtcars$cyl <- as.factor(mtcars$cyl)
model <- glm(formula = mpg ~ cyl, data = mtcars[mtcars$cyl !=6,])
model$xlevels[["cyl"]] <- union(model$xlevels[["cyl"]], levels(mtcars$cyl))
mtcars$preds <- predict(model, newdata = mtcars)
head(mtcars,15)
给我:
mpg cyl disp hp drat wt qsec vs am gear carb preds
Mazda RX4 21.0 6 160.0 110 3.90 2.620 16.46 0 1 4 4 26.66364
Mazda RX4 Wag 21.0 6 160.0 110 3.90 2.875 17.02 0 1 4 4 26.66364
Datsun 710 22.8 4 108.0 93 3.85 2.320 18.61 1 1 4 1 26.66364
Hornet 4 Drive 21.4 6 258.0 110 3.08 3.215 19.44 1 0 3 1 26.66364
Hornet Sportabout 18.7 8 360.0 175 3.15 3.440 17.02 0 0 3 2 15.10000
Valiant 18.1 6 225.0 105 2.76 3.460 20.22 1 0 3 1 26.66364
Duster 360 14.3 8 360.0 245 3.21 3.570 15.84 0 0 3 4 15.10000
Merc 240D 24.4 4 146.7 62 3.69 3.190 20.00 1 0 4 2 26.66364
Merc 230 22.8 4 140.8 95 3.92 3.150 22.90 1 0 4 2 26.66364
Merc 280 19.2 6 167.6 123 3.92 3.440 18.30 1 0 4 4 26.66364
Merc 280C 17.8 6 167.6 123 3.92 3.440 18.90 1 0 4 4 26.66364
Merc 450SE 16.4 8 275.8 180 3.07 4.070 17.40 0 0 3 3 15.10000
Merc 450SL 17.3 8 275.8 180 3.07 3.730 17.60 0 0 3 3 15.10000
Merc 450SLC 15.2 8 275.8 180 3.07 3.780 18.00 0 0 3 3 15.10000
Cadillac Fleetwood 10.4 8 472.0 205 2.93 5.250 17.98 0 0 3 4 15.10000
对我来说,模型似乎只是从另一个因子级别选择系数(在本例中,cyl = 4
的系数用于对 cyl = 6
进行预测)。
因为这对我来说绝对没问题,如果有人能确认这确实发生了,我将不胜感激。
让我们从查看部分数据集的模型系数开始summary(model)
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 26.664 1.068 24.966 < 2e-16 ***
cyl8 -11.564 1.427 -8.102 3.45e-08 ***
cyl8
的预测等于截距 + cyl8
的效果,因此 26.664 + -11.564 = 15.10。对于其他因子水平 (cyl4
),预测等于截距 (26.664)。添加未知的因子水平将产生相同的预测,因为 R 没有附加因子效应的基础(这些在原始模型中被排除)。
我们可以看到,已知因素的估计不受基于完整数据估计模型的影响。
model2<- glm(formula = mpg ~ cyl, data = mtcars)
summary(model2)
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 26.6636 0.9718 27.437 < 2e-16 ***
cyl6 -6.9208 1.5583 -4.441 0.000119 ***
cyl8 -11.5636 1.2986 -8.905 8.57e-10 ***
您看到 cyl8
和参考类别 cyl4
的估计效果没有变化(仍然分别为 15.10 和 26.66)。因此,该模型将对这些因素水平产生相同的预测。但是,正如您从新估计的系数中看到的那样,cyl6
的预测被高估了 6.92。
我正在用一个特定因子变量拟合一个 glm 模型,其中的数据不包含我要应用该模型的数据中该变量的所有级别。可以忽略未知级别,因此无论模型为它们预测什么,我都不在乎,只要它将其余部分视为训练和应用程序数据中的级别相同即可。
由于应用程序数据中的未知因素水平会产生错误,我搜索了一种解决方法,并在此处找到了 @matt_k 提供的一个很好的解决方法: "Factor has new levels" error for variable I'm not using
现在追加一个新级别仍然会给出警告信息:
In predict.lm(object, newdata, se.fit, scale = 1, type = ifelse(type == :
prediction from a rank-deficient fit may be misleading
所以我想知道到底发生了什么。我在一个非常简单的例子中尝试过,在 mpg
模型中省略了圆柱体 6
级别 mtcars
:
mtcars$cyl <- as.factor(mtcars$cyl)
model <- glm(formula = mpg ~ cyl, data = mtcars[mtcars$cyl !=6,])
model$xlevels[["cyl"]] <- union(model$xlevels[["cyl"]], levels(mtcars$cyl))
mtcars$preds <- predict(model, newdata = mtcars)
head(mtcars,15)
给我:
mpg cyl disp hp drat wt qsec vs am gear carb preds
Mazda RX4 21.0 6 160.0 110 3.90 2.620 16.46 0 1 4 4 26.66364
Mazda RX4 Wag 21.0 6 160.0 110 3.90 2.875 17.02 0 1 4 4 26.66364
Datsun 710 22.8 4 108.0 93 3.85 2.320 18.61 1 1 4 1 26.66364
Hornet 4 Drive 21.4 6 258.0 110 3.08 3.215 19.44 1 0 3 1 26.66364
Hornet Sportabout 18.7 8 360.0 175 3.15 3.440 17.02 0 0 3 2 15.10000
Valiant 18.1 6 225.0 105 2.76 3.460 20.22 1 0 3 1 26.66364
Duster 360 14.3 8 360.0 245 3.21 3.570 15.84 0 0 3 4 15.10000
Merc 240D 24.4 4 146.7 62 3.69 3.190 20.00 1 0 4 2 26.66364
Merc 230 22.8 4 140.8 95 3.92 3.150 22.90 1 0 4 2 26.66364
Merc 280 19.2 6 167.6 123 3.92 3.440 18.30 1 0 4 4 26.66364
Merc 280C 17.8 6 167.6 123 3.92 3.440 18.90 1 0 4 4 26.66364
Merc 450SE 16.4 8 275.8 180 3.07 4.070 17.40 0 0 3 3 15.10000
Merc 450SL 17.3 8 275.8 180 3.07 3.730 17.60 0 0 3 3 15.10000
Merc 450SLC 15.2 8 275.8 180 3.07 3.780 18.00 0 0 3 3 15.10000
Cadillac Fleetwood 10.4 8 472.0 205 2.93 5.250 17.98 0 0 3 4 15.10000
对我来说,模型似乎只是从另一个因子级别选择系数(在本例中,cyl = 4
的系数用于对 cyl = 6
进行预测)。
因为这对我来说绝对没问题,如果有人能确认这确实发生了,我将不胜感激。
让我们从查看部分数据集的模型系数开始summary(model)
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 26.664 1.068 24.966 < 2e-16 ***
cyl8 -11.564 1.427 -8.102 3.45e-08 ***
cyl8
的预测等于截距 + cyl8
的效果,因此 26.664 + -11.564 = 15.10。对于其他因子水平 (cyl4
),预测等于截距 (26.664)。添加未知的因子水平将产生相同的预测,因为 R 没有附加因子效应的基础(这些在原始模型中被排除)。
我们可以看到,已知因素的估计不受基于完整数据估计模型的影响。
model2<- glm(formula = mpg ~ cyl, data = mtcars)
summary(model2)
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 26.6636 0.9718 27.437 < 2e-16 ***
cyl6 -6.9208 1.5583 -4.441 0.000119 ***
cyl8 -11.5636 1.2986 -8.905 8.57e-10 ***
您看到 cyl8
和参考类别 cyl4
的估计效果没有变化(仍然分别为 15.10 和 26.66)。因此,该模型将对这些因素水平产生相同的预测。但是,正如您从新估计的系数中看到的那样,cyl6
的预测被高估了 6.92。