EstimasI dengan dan tanpa pencilan

Data yang disediakan pada latihan ini (hypdata_outlier) memiliki satu pencilan yang sangat ekstrem. Ditampilkan sebuah plot dari himpunan data tersebut, serta model regresi linear response terhadap explanatory. Anda akan menghapus titik pencilan tersebut untuk melihat bagaimana satu observasi dapat memengaruhi taksiran garis.

Latihan ini adalah bagian dari kursus

Inferensi untuk Regresi Linear di R

Lihat Kursus

Petunjuk latihan

Saring hypdata_outlier untuk menghapus pencilan.
Perbarui plot p untuk menambahkan satu lapisan smooth lagi (gunakan geom_smooth).
- Seperti pita yang lain, pembaruan harus menggunakan metode regresi linear, dan tidak menggambar pita.
- Berbeda dengan pita yang lain, pembaruan harus menggunakan data = hypdata_no_outlier dan berwarna merah.
- Untuk saat ini, gunakan kurva smooth saja, tanpa batas kepercayaan (se = FALSE).

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

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

Edit dan Jalankan Kode