Aleatorizando o custo de oportunidade
Como no Exercício 5 do Capítulo 2, você vai permutar os dados para gerar uma distribuição de diferenças como se a hipótese nula fosse verdadeira.
No estudo, o número de indivíduos em cada um dos grupos de controle e tratamento é fixo. Além disso, quando você assume que a hipótese nula é verdadeira — ou seja, o experimento não teve efeito sobre o desfecho de comprar um DVD — é razoável inferir que o número de pessoas que comprariam um DVD também é fixo. Ou seja, 97 pessoas comprariam um DVD independentemente do grupo de tratamento em que estivessem.
Usando os novos dados e os métodos do capítulo anterior, crie uma distribuição de aleatorização da diferença nas proporções calculada em dados permutados.
Este exercício faz parte do curso
Fundamentos de Inferência em R
Exercício interativo prático
Experimente este exercício completando este código de exemplo.
# Calculate the observed difference in purchase rate
diff_obs <- opportunity %>%
# Group by group
___(___) %>%
# Calculate proportion deciding to buy a DVD
___(prop_buy = ___(___)) %>%
# Calculate difference between groups
___(stat = ___) %>%
pull()