R/vital_deaths_module.R

#' @export
vital_deaths_module <- function(dat,at){
  
  #Description:
  #Calls vital_death_aged_out, vital_death_aids, vital_death_non_aids
  dat <- vital_death_aids(dat,at)
  dat<- vital_death_aged_out(dat,at)
  dat <- vital_death_non_aids(dat,at)
  
  return(dat)

}
EvoNetHIV/EvoNetVaccine documentation built on May 6, 2019, 4:06 p.m.