Stämmer datan överens med modellen?

Generellt sett är det en god idé att använda tvåsidiga p-värden, som du har beräknat på följande sätt:

# Compute two-tailed p-value
null %>%
  summarize(pval = 2 * mean(stat <= d_hat))

För chi-kvadrattestet beräknar du däremot bara den högra svansen, vilket gör det till ett ensidigt test. Det är denna svans som innehåller statistikor som är vanligare när oberoendhypotesen är falsk.

Använd de objekt du skapade i föregående övning (null_spac, null_arms, chi_obs_spac och chi_obs_arms) för att beräkna p-värdena för dessa två hypotestest och använd dem för att välja rätt svar nedan. Observera att du behöver justera koden ovan så att du enbart inkluderar den högra (större än) svansen i dina p-värden.