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 merupakan bagian dari kursus

Inferensi untuk Regresi Linear di R

Lihat Kursus

Instruksi 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 langsung praktik

Cobalah latihan ini dengan melengkapi kode contoh ini.

# 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