Interval kepercayaan untuk respons rata-rata pada semua observasi
Interval kepercayaan untuk respons rata-rata dapat dihitung untuk semua observasi dalam himpunan data. Dengan menggunakan augment() secara langsung pada himpunan data twins, Anda akan memperoleh prediksi dan galat baku untuk kembar Foster berdasarkan semua observasi Biological.
Perlu diperhatikan bahwa perhitungan garis regresi lebih stabil di bagian tengah, sehingga prediksi untuk nilai-nilai ekstrem lebih bervariasi dibandingkan prediksi di tengah rentang IQ penjelas.
Prediksi IQ kembar Foster yang Anda hitung sebelumnya telah disediakan sebagai predictions. Prediksi ini ditampilkan dalam plot menggunakan geom_smooth().
Latihan ini adalah bagian dari kursus
Inferensi untuk Regresi Linear di R
Petunjuk latihan
Buat secara manual apa yang dilakukan geom_smooth(), menggunakan predictions. Sediakan estetika dan data untuk setiap geom.
- Tambahkan layer titik
Fostervs.Biological, menggunakan himpunan datadata = twins. - Tambahkan layer garis
.fittedvs.Biological, menggunakan himpunan datadata = predictions. Warnai garis"blue". - Tambahkan layer pita dengan
xdipetakan keBiological,ymindipetakan kelower_mean_predictiondanymaxdipetakan keupper_mean_prediction. Gunakan himpunan datadata = predictionsdan atur tingkat transparansi,alphake0.2.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# This plot is shown
ggplot(twins, aes(x = Biological, y = Foster)) +
geom_point() +
geom_smooth(method = "lm")
ggplot() +
# Add a point layer of Foster vs. Biological, using twins
___(aes(___, ___), data = ___) +
# Add a line layer of .fitted vs Biological, using predictions, colored blue
___ +
# Add a ribbon layer of lower_mean_prediction to upper_mean_prediction vs Biological,
# using predictions, transparency of 0.2
___