Spécifier et émettre des hypothèses
Au chapitre 3, vous avez effectué un test de proportion à deux échantillons sur la proportion d'expéditions en retard dans les groupes de coûts de fret. Rappelez les hypothèses.
\(H_{0}\): \(late_{\text{expensive}} - late_{\text{reasonable}} = 0\)
\(H_{A}\): \(late_{\text{expensive}} - late_{\text{reasonable}} > 0\)
Comparons cette approche traditionnelle utilisant prop_test() avec un pipeline infer basé sur la simulation.
late_shipments est disponible ; dplyr et infer sont chargés.
Cet exercice fait partie du cours
Tests d'hypothèses en R
Exercice interactif pratique
Essayez cet exercice en complétant cet exemple de code.
# Perform a proportion test appropriate to the hypotheses
test_results <- late_shipments %>%
prop_test(
late ~ freight_cost_group,
order = c("expensive", "reasonable"),
success = "Yes",
alternative = "greater",
correct = FALSE
)
# See the results
test_results