Uji t berbasis simulasi
Pada Bab 2 Anda melakukan langkah-langkah uji t secara manual untuk mengeksplorasi hipotesis berikut.
\(H_{0}\): Rata-rata berat kiriman yang tidak terlambat sama dengan rata-rata berat kiriman yang terlambat.
\(H_{A}\): Rata-rata berat kiriman yang tidak terlambat lebih kecil daripada rata-rata berat kiriman yang terlambat.
Anda dapat menjalankan uji tersebut dengan lebih ringkas menggunakan t_test() dari infer.
late_shipments %>%
t_test(
weight_kilograms ~ late,
order = c("No", "Yes"),
alternative = "less"
)
t_test() mengasumsikan bahwa sebaran nol bersifat normal. Kita dapat menghindari asumsi tersebut dengan menggunakan padanan non-parametrik berbasis simulasi.
late_shipments tersedia; dplyr dan infer sudah dimuat.
Latihan ini adalah bagian dari kursus
Pengujian Hipotesis di R
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# Fill out the null distribution pipeline
null_distn <- late_shipments %>%
# Specify weight_kilograms vs. late
___ %>%
# Declare a null hypothesis of independence
___ %>%
# Generate 1000 permutation replicates
___ %>%
# Calculate the difference in means ("No" minus "Yes")
___
# See the results
null_distn