Estimation with and without outlier

The data provided in this exercise (hypdata_outlier) has an extreme outlier. A plot is shown of the dataset, and a linear regression model of response versus explanatory. You will remove the outlying point to see how one observation can affect the estimate of the line.

Este ejercicio forma parte del curso

Inference for Linear Regression in R

Ver curso

Instrucciones del ejercicio

Filter hypdata_outlier to remove the outlier.
Update the plot, p, to add another smooth layer (use geom_smooth).
- Like the other ribbon, the update should use the linear regression method, and not draw the ribbon.
- Unlike the other ribbon, the update should use the data = hypdata_no_outlier and be colored red.
- For now, just use the smooth curve, and not the confidence bounds (se = FALSE).

Ejercicio interactivo práctico

Prueba este ejercicio completando el código de muestra.

# This plot is shown
p <- ggplot(hypdata_outlier, aes(x = explanatory, y = response)) + 
  geom_point() +
  geom_smooth(method = "lm", se = FALSE) 

# Filter to remove the outlier
hypdata_no_outlier <- ___

p +
  # Add another smooth lin .reg. layer, no ribbon, 
  # hypdata_no_outlier data, colored red
  ___

Editar y ejecutar código