From 13855b84cf64cfde89c144b32d2c3d3d239d8ac1 Mon Sep 17 00:00:00 2001
From: Felipe Gonzalez <felipexgonzalez@gmail.com>
Date: Thu, 25 Jan 2024 09:34:08 -0600
Subject: [PATCH] Aclarar etiquetas

---
 notas/02-flujo-basico-2.qmd | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/notas/02-flujo-basico-2.qmd b/notas/02-flujo-basico-2.qmd
index e72e124..b54754b 100644
--- a/notas/02-flujo-basico-2.qmd
+++ b/notas/02-flujo-basico-2.qmd
@@ -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")) +