Merge pull request #36 from rfsaldanha/sinan-malaria

Sinan malaria
rfsaldanha · Sep 14, 2021 · af09380 · af09380
2 parents bf00c94 + b596dd7
commit af09380
Show file tree

Hide file tree

Showing 9 changed files with 388 additions and 5 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: microdatasus
 Title: Download and preprocess DataSUS files
-Version: 1.3.1
+Version: 1.4.0
 Authors@R: 
     person(given = "Raphael",
            family = "Saldanha",

diff --git a/NAMESPACE b/NAMESPACE
@@ -7,5 +7,6 @@ export(process_sih)
 export(process_sim)
 export(process_sinan_chikungunya)
 export(process_sinan_dengue)
+export(process_sinan_malaria)
 export(process_sinan_zika)
 export(process_sinasc)
diff --git a/NEWS.md b/NEWS.md
@@ -1,3 +1,6 @@
+# microdatasus 1.4.0
+* Download and preprocess SINAN Malaria files.
+
 # microdatasus 1.3.1
 * Update functions documentation.
 

diff --git a/R/process_sinan_dengue.R b/R/process_sinan_dengue.R
@@ -10,7 +10,6 @@
 #' @examples \dontrun{
 #' df <- fetch_datasus(year_start = 2016, year_end = 2016,
 #' uf = "RJ", information_system = "SINAN-DENGUE-FINAL")
-#' df <- process_sinan_dengue(year_start = 2016, year_end = 2016, uf = "RJ")
 #' df_a <- process_sinan_dengue(df)
 #' df_b <- process_sinan_dengue(df, municipality_data = FALSE)
 #' }

diff --git a/R/process_sinan_malaria.R b/R/process_sinan_malaria.R
diff --git a/README.md b/README.md
@@ -25,8 +25,8 @@ O manual para a utilização do pacote encontra-se na [Wiki do projeto](https://
 
 ### Sistemas de Informação em Saúde suportados
 
-* Download: SIM, SINASC, SIH, CNES, SIA, SINAN-DENGUE, SINAN-CHIKUNGUNYA, SINAN-ZIKA.
-* Pré-processamento: SIM, SINASC, SIH-RD, CNES-ST, CNES-PF, SINAN-DENGUE, SINAN-CHIKUNGUNYA, SINAN-ZIKA.
+* Download: SIM, SINASC, SIH, CNES, SIA, SINAN-DENGUE, SINAN-CHIKUNGUNYA, SINAN-ZIKA, SINAN-MALARIA.
+* Pré-processamento: SIM, SINASC, SIH-RD, CNES-ST, CNES-PF, SINAN-DENGUE, SINAN-CHIKUNGUNYA, SINAN-ZIKA, SINAN-MALARIA.
 
 ## Agradecimento
 

diff --git a/man/process_sinan_dengue.Rd b/man/process_sinan_dengue.Rd
diff --git a/man/process_sinan_malaria.Rd b/man/process_sinan_malaria.Rd
diff --git a/tests/testthat/test-sinan-malaria.R b/tests/testthat/test-sinan-malaria.R
@@ -0,0 +1,9 @@
+test_that("sinan-malaria-final at 2016", {
+  sinan_malaria_final <- fetch_datasus(year_start = 2016, year_end = 2016, uf = "AM", information_system = "SINAN-MALARIA-FINAL")
+  sinan_malaria_final <- process_sinan_malaria(sinan_malaria_final, municipality_data = TRUE)
+})
+
+test_that("sinan-malaria-preliminar at 2020", {
+  sinan_malaria_preliminar <- fetch_datasus(year_start = 2020, year_end = 2020, uf = "AM", information_system = "SINAN-MALARIA-PRELIMINAR")
+  sinan_malaria_preliminar <- process_sinan_malaria(sinan_malaria_preliminar, municipality_data = TRUE)
+})