I first create an test dataset and then fit a model as follows:

```
#mtcars data set
test <- mtcars
#adding just one NA in the cyl column
test[2, 2] <- NA
#running linear model
mod <- lm(data = test, formula=mpg ~ cyl, na.action = na.exclude)
#saving residuals
test$res <- residuals(mod)
#outoplot.lm
ggfortify:::autoplot.lm(object=mod, which = c(1,2,3,4,5))
#using autoplot funtion
ggplot2::autoplot(which = c(1, 2, 3, 4,5,6), object = mod)
#I get the following error
Error in `$<-.data.frame`(`*tmp*`, .hat, value = c(0.0326370757180157, :
replacement has 32 rows, data has 31
```

Is there a work around or an an alternative function that will give me all the six residual plots without removing `na.action = na.exclude`

from the model?.