Memvisualisasikan variabilitas p-hat

Untuk membandingkan variabilitas nilai \(\hat{p}\) dan \(\hat{p}^*\) yang diambil sampelnya pada latihan sebelumnya, akan sangat membantu jika Anda memvisualisasikan distribusinya. Sebagai pengingat, latihan tersebut membahas dua eksperimen berbeda untuk menyelidiki variabilitas \(\hat{p}\) dan \(\hat{p}^*\):

Eksperimen 1: Mengambil sampel (\(n = 30\)) berulang kali dari populasi yang sangat besar (standar emas, tetapi tidak realistis)
Eksperimen 2: Mengambil ulang sampel (\(n = 30\)) berulang kali dengan pengembalian dari satu sampel berukuran 30

Latihan ini adalah bagian dari kursus

Dasar-dasar Inferensi di R

Lihat Kursus

Petunjuk latihan

Gabungkan data dari kedua eksperimen dengan memanggil bind_rows(), meneruskan ex1_props dan ex2_props. Beri nama both_ex_props. Sebuah kolom ID himpunan data bernama experiment akan dibuat.
Dengan menggunakan both_ex_props, plot stat dengan warna berdasarkan experiment.
Tambahkan kurva kerapatan menggunakan geom_density(), dengan mengatur argumen lebar pita, bw, ke 0.1.

Latihan interaktif praktis

Cobalah latihan ini dengan menyelesaikan kode contoh berikut.

# Combine data from both experiments
both_ex_props <- ___(___, ___, .id = "experiment")

# Using both_ex_props, plot stat colored by experiment
ggplot(___, aes(___, color = ___)) + 
  # Add a density layer with bandwidth 0.1
  ___(bw = ___)

Edit dan Jalankan Kode