# check the consistency between malaria tests and cases
# get path
path <- system.file(
"extdata",
"fake_epi_df_togo.rds",
package = "epiCleanr")
fake_epi_df_togo <- import(path)
consistency_check(fake_epi_df_togo,
tests = c("malaria_tests","cholera_tests"),
cases = c("malaria_cases", "cholera_cases"))
Run the code above in your browser using DataLab