class: center, middle, inverse, title-slide .title[ # Hotspots del Vector del Dengue ] .author[ ### Felipe Antonio Dzul Manzanilla ] .date[ ### 2022: Last compiled 2022-11-02 ] --- class: left, top
### Ciclo de Vida del Programa de Prevención y Control del Dengue
--- ### Línea de Tiempo de la Vigilancia Epidemiológica & Entomológica <hr style="height:2px;border-width:0;color:#330019;background-color:#330019">
+
-
--- ### **Análisis Espacial del Vector del Dengue** <hr style="height:2px;border-width:0;color:#330019;background-color:#330019">
--- ### **Análisis Espacial del Vector del Dengue** <hr style="height:2px;border-width:0;color:#330019;background-color:#330019">
.tiny[.blue[.footnote[ [Modificado de Zuur et al 2017](http://www.highstat.com/index.php/beginner-s-guide-to-regression-models-with-spatial-and-temporal-correlation); [Dzul-Manzanilla et al 2019](http://acaentmex.org/entomologia/revista/2019/EMF/EMF%20497-501.pdf)]]] --- ### **Análisis Espacial del Vector del Dengue** <hr style="height:2px;border-width:0;color:#330019;background-color:#330019">
.tiny[.blue[.footnote[ [Modificado de Zuur et al 2017](http://www.highstat.com/index.php/beginner-s-guide-to-regression-models-with-spatial-and-temporal-correlation); [Dzul-Manzanilla et al 2019](http://acaentmex.org/entomologia/revista/2019/EMF/EMF%20497-501.pdf)]]] --- ### **Vigilancia Entomológica con Ovitrampas** <hr style="height:2px;border-width:0;color:#330019;background-color:#330019"> <img src="maps/loc.jpg"> .tiny[.blue[.footnote[localidades urbanas = 4553, localidades urbanas con ovitrampas = 530, y localidades urbanas de alto risgo con ovitrampas 122]]] --- ### Vigilancia Entomológica con Ovitrampas <hr style="height:2px;border-width:0;color:#330019;background-color:#330019"> .pull-left[ .small[.justify-left[ - **Muestro Sistemático** - 1 manzana por cada 4 a 6 en zonas planas - 1 manzana por cada 2 a 4 en zonas con pendientes - **Muestreo por autoselección** - una casa por cada lado de la manzana - **Colecta semanal** - **Captura en línea** ] ] ] .pull-right[ .blue[Coatzacoalcos]
] --- ### Toma de Decisiones & Ovitrampas <hr style="height:2px;border-width:0;color:#330019;background-color:#330019">
--- ### Decisiones Basadas en Evidencia & Ovitrampas
--- ### Decisiones Basadas en Evidencia & Ovitrampas .panelset.sideways[ .panel[.panel-name[Distribución de Ovitrampas Código] ```r # Step 1. load the function source("C:/Users/HOME/Dropbox/r_developments/r_new_functions/3.Functions/eggs_risk.R") # Step 2. apply the function eggs_risk(path_vect = "31_yucatan", path_coord = "31_yucatan/DescargaOvitrampasMesFco.txt", cve_edo = "31", map_view = FALSE, weeks = 43, locality = "Valladolid", size = 4, alpha = .3, leg_title = "Huevos", palette_vir = "viridis", risk = FALSE) ``` ] .panel[.panel-name[Distribución de Ovitrampas Mapa] <!-- --> ] .panel[.panel-name[Riesgo Entomológico Código] ```r # Step 1. load the function source("C:/Users/HOME/Dropbox/r_developments/r_new_functions/3.Functions/eggs_risk.R") # Step 2. apply the function eggs_risk(path_vect = "31_yucatan", path_coord = "31_yucatan/DescargaOvitrampasMesFco.txt", cve_edo = "31", map_view = TRUE, weeks = 43, locality = "Valladolid", size = 4, alpha = .3, leg_title = "Huevos", palette_vir = "viridis", risk = FALSE) ``` ] .panel[.panel-name[Riesgo Entomologico Mapa]
] .panel[.panel-name[Manzanas Calientes Código] ```r # Step 1. load the function source("C:/Users/HOME/Dropbox/r_developments/r_new_functions/3.Functions/eggs_hotblocks.R") # Step 2. apply the function eggs_hotspots(path_vect = "31_yucatan", cve_ent = "31", locality = "Tizimín", week = 43, brand = "slack") ``` ] .panel[.panel-name[Manzanas Calientes Mapa]
] ] --- ### Decisiones Basadas en Evidencia & Ovitrampas .panelset.sideways[ .panel[.panel-name[Prediccion Sem 41 Code] ```r deneggs::eggs_hotspots(path_lect = "31_yucatan", cve_ent = 31, locality = "Merida", path_coord = "31_yucatan/DescargaOvitrampasMesFco.txt", longitude = "Pocision_X", latitude = "Pocision_Y", aproximation = "gaussian", integration = "eb", fam = "zeroinflatednbinomial1", k = 30, palette_vir = "magma", leg_title = "Huevos", plot = FALSE, hist_dataset = FALSE, ##### NOTA sem = 41, var = "eggs", cell_size = 2000, alpha = .99)$map ``` ] .panel[.panel-name[Prediccion Sem 41] <!-- --> ] .panel[.panel-name[Prediccion Sem 42 Code] ```r deneggs::eggs_hotspots(path_lect = "31_yucatan", cve_ent = 31, locality = "Merida", path_coord = "31_yucatan/DescargaOvitrampasMesFco.txt", longitude = "Pocision_X", latitude = "Pocision_Y", aproximation = "gaussian", integration = "eb", fam = "zeroinflatednbinomial1", k = 30, palette_vir = "magma", leg_title = "Huevos", plot = FALSE, hist_dataset = FALSE, sem = 42, var = "eggs", cell_size = 2000, alpha = .99)$map ``` ] .panel[.panel-name[Prediccion Sem 42] <!-- --> ] .panel[.panel-name[Prediccion Sem 43 Code] ```r deneggs::eggs_hotspots(path_lect = "31_yucatan", cve_ent = 31, locality = "Merida", path_coord = "31_yucatan/DescargaOvitrampasMesFco.txt", longitude = "Pocision_X", latitude = "Pocision_Y", aproximation = "gaussian", integration = "eb", fam = "zeroinflatednbinomial1", k = 30, palette_vir = "magma", leg_title = "Huevos", plot = FALSE, hist_dataset = FALSE, ##### NOTA sem = 43, var = "eggs", cell_size = 2000, alpha = .99)$map ``` ] .panel[.panel-name[Prediccion Sem 43] <!-- --> ] ] --- ### Decisiones Basadas en Evidencia & Ovitrampas <hr style="height:2px;border-width:0;color:#330019;background-color:#330019">  --- ## Dios Botic! <hr style="height:2px;border-width:0;color:#330019;background-color:#330019"> - ***Bio*** : https://fdzul.github.io/web_site_fadm/ - ***email*** : [felipe.dzul.m@gmail.com]() - ***celular*** : [8139945623]() - ***slides***: https://animated-longma-729cee.netlify.app/talks/hotspots_eggs/#1 .footnote[La presentación fue creada via [**xaringan**](https://github.com/yihui/xaringan), [**revealjs**](https://revealjs.com/), [remark.js](https://remarkjs.com), [**knitr**](http://yihui.name/knitr), & [R Markdown](https://rmarkdown.rstudio.com) en [R]() & [RStudio](2.R_Scripts/libs/rstudio_leaflet/rstudio_leaflet.css).]