From 176faf3163c9e5d6bb5c0de53967f0f4bf012281 Mon Sep 17 00:00:00 2001
From: Andree Valle Campos <avallecam@gmail.com>
Date: Tue, 6 Aug 2024 17:13:22 +0100
Subject: [PATCH] avoid data print

---
 episodes/epiCo-tutorial.Rmd | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/episodes/epiCo-tutorial.Rmd b/episodes/epiCo-tutorial.Rmd
index c2a5f2d..fa54366 100644
--- a/episodes/epiCo-tutorial.Rmd
+++ b/episodes/epiCo-tutorial.Rmd
@@ -134,8 +134,9 @@ Para calcular la distribución de las ocupaciones en estos años, **epiCo** usa
 # Tabla de ocupaciones del sistema ISCO-88.
 data("isco88_table")
 head(isco88_table)
+
 # Se calcula la distribución de ocupaciones.
-describe_occupation(isco_codes = as.integer(epi_data$ocupacion), sex = epi_data$sexo,plot = "treemap")
+occupation <- describe_occupation(isco_codes = as.integer(epi_data$ocupacion), sex = epi_data$sexo, plot = "treemap")
 ```
 
 ### 5.	Estimación de las tasas de incidencia