
Last chance! 50% off unlimited learning
Sale ends in
A small counterexample data set devised by Andrew Siegel.
Six (out of nine) data points lie on the line
data(SiegelsEx, package="robustbase")
A data frame with 9 observations on the following 2 variables.
x
a numeric vector
y
a numeric vector
Peter J. Rousseeuw and Annick M. Leroy (1987) Robust Regression and Outlier Detection Wiley, p.60--61
# NOT RUN {
data(SiegelsEx)
plot(SiegelsEx, main = "Siegel's example for 'exact fit'")
abline( lm(y ~ x, data = SiegelsEx))
abline(MASS::lqs(y ~ x, data = SiegelsEx, method = "lms"), col = 2)
legend("topright", leg = c("lm", "LMS"), col=1:2, lwd=1, inset = 1/20)
# }
Run the code above in your browser using DataLab