Uji dua proporsi
Anda mungkin bertanya-tanya apakah besarnya biaya angkut memengaruhi apakah suatu pengiriman terlambat atau tidak. Ingat bahwa dalam himpunan data late_shipments, status keterlambatan pengiriman disimpan pada kolom late. Biaya angkut disimpan pada kolom freight_cost_group, dengan kategori "expensive" dan "reasonable".
Kita dapat menyusun hipotesis untuk diuji.
\(H_{0}\): \(late_{\text{expensive}} - late_{\text{reasonable}} = 0\)
\(H_{A}\): \(late_{\text{expensive}} - late_{\text{reasonable}} > 0\)
p_hats berisi taksiran proporsi populasi (proporsi sampel) untuk grup "expensive" dan "reasonable". ns berisi ukuran sampel untuk kedua grup tersebut.
Latihan ini adalah bagian dari kursus
Pengujian Hipotesis di R
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# See the sample variables
print(p_hats)
print(ns)
# Calculate the pooled estimate of the population proportion
p_hat <- ___
# See the result
p_hat