powered by
missing_est(model)
diff_terms
data(simdat) # Add missing values: set.seed(123) simdat[sample(nrow(simdat), size=20),]$Y <- NA # Fit simple linear model: lm1 <- lm(Y ~ Time, data=simdat) na.el <- missing_est(lm1) length(na.el)
Run the code above in your browser using DataLab