## example from 'glm'
clotting <- data.frame(
u = c(5,10,15,20,30,40,60,80,100),
lot1 = c(118,58,NA,35,27,25,21,19,18), ## NA inserted instead of 42
lot2 = c(69,35,26,21,18,16,13,12,12))
r.gam <- glm(lot1 ~ log(u), data = clotting, family = Gamma)
linear.predictors(r.gam)
## 8 elements; 3rd missing.
r.gex <- glm(lot1 ~ log(u), data = clotting, family = Gamma,
na.action=na.exclude)
linear.predictors(r.gex)
## 9 elements, third is NA
Run the code above in your browser using DataLab