### Name: fitted.lmList
### Title: Extract lmList Fitted Values
### Aliases: fitted.lmList
### Keywords: models

### ** Examples

fm1 <- lmList(distance ~ age | Subject, Orthodont)
fitted(fm1)