Skip to content

Commit

Permalink
Aclarar etiquetas
Browse files Browse the repository at this point in the history
  • Loading branch information
felipegonzalez committed Jan 25, 2024
1 parent e171b3e commit 13855b8
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions notas/02-flujo-basico-2.qmd
Original file line number Diff line number Diff line change
Expand Up @@ -268,9 +268,9 @@ sims_post <-
simular_posterior_error(una_muestra$Pos, 5000, 1, 1)
ambas_sims_tbl <-
sims_post_error |>
mutate(tipo = "Con error") |>
mutate(tipo = "Con error de medición") |>
bind_rows(sims_post |>
mutate(tipo = "Sin error"))
mutate(tipo = "Sin error de medición"))
ambas_sims_tbl |> ggplot(aes(x = theta, fill = tipo)) +
geom_histogram(position = "identity", alpha = 0.5, bins = 50) +
scale_fill_manual(values = c("red", "blue")) +
Expand Down

0 comments on commit 13855b8

Please sign in to comment.