Visualizando a variabilidade de p-chapéu

Para comparar a variabilidade dos valores amostrados \(\hat{p}\) e \(\hat{p}^*\) nos exercícios anteriores, é útil visualizar suas distribuições. Relembrando, os exercícios apresentaram dois experimentos diferentes para investigar a variabilidade de \(\hat{p}\) e \(\hat{p}^*\):

Experimento 1: Amostrar (\(n = 30\)) repetidamente de uma população extremamente grande (padrão-ouro, porém irrealista)
Experimento 2: Reamostrar (\(n = 30\)) repetidamente com reposição a partir de uma única amostra de tamanho 30

Este exercício faz parte do curso

Fundamentos de Inferência em R

Ver curso

Instruções do exercício

Combine os dados de ambos os experimentos chamando bind_rows(), passando ex1_props e ex2_props. Chame isso de both_ex_props. Uma coluna de ID do conjunto de dados chamada experiment será criada.
Usando both_ex_props, faça um gráfico de stat colorido por experiment.
Adicione uma curva de densidade usando geom_density(), definindo o argumento de largura de banda, bw, como 0.1.

Exercício interativo prático

Experimente este exercício completando este código de exemplo.

# Combine data from both experiments
both_ex_props <- ___(___, ___, .id = "experiment")

# Using both_ex_props, plot stat colored by experiment
ggplot(___, aes(___, color = ___)) + 
  # Add a density layer with bandwidth 0.1
  ___(bw = ___)

Editar e executar o código