data_event <- epiCo::epi_data
incidence_historic <- incidence::incidence(data_event$fec_not,
groups = data_event$cod_mun_o,
interval = "4 year"
)
incidence_object <- subset(incidence_historic,
from = "2015-01-04",
to = "2018-12-27"
)
morans_index(incidence_object, scale = 100000, threshold = 2, plot = TRUE)
Run the code above in your browser using DataLab