Os dados vêm da população?
Lembre que a diferença observada (isto é, a diferença nas proporções no conjunto de dados homes, mostrada como a linha vertical vermelha) foi por volta de -0,0078, o que parece ficar abaixo da maior parte da densidade das diferenças embaralhadas. No entanto, é importante saber se alguma das diferenças permutadas aleatoriamente foi tão extrema quanto a diferença observada.
Neste exercício, você vai recriar esse gráfico de pontos como um gráfico de densidade e contar quantas diferenças permutadas ficaram à esquerda da diferença observada.
Este exercício faz parte do curso
Fundamentos de Inferência em R
Instruções do exercício
O conjunto de dados homeown_perm está disponível no seu workspace.
- Usando
geom_density(), faça o gráfico das diferenças permutadas. - Adicione uma linha vertical vermelha com
geom_vline()no ponto onde está a diferença observada.diff_origestá disponível no seu workspace e representa o valor original da estatística de diferença. - Conte quantas diferenças permutadas foram menores ou iguais à diferença observada.
Exercício interativo prático
Experimente este exercício completando este código de exemplo.
# Plot permuted differences, diff_perm
ggplot(homeown_perm, aes(x = ___)) +
# Add a density layer
___() +
# Add a vline layer with intercept diff_orig
___(aes(xintercept = ___), color = "red")
# Compare permuted differences to observed difference
homeown_perm %>%
summarize(n_perm_le_obs = sum(___ <= ___))