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.

Questo esercizio fa parte del corso

Inference for Linear Regression in R

Visualizza il corso

Istruzioni dell'esercizio

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).

Esercizio pratico interattivo

Prova a risolvere questo esercizio completando il codice di esempio.

# 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
  ___

Modifica ed esegui il codice