# NOT RUN {
data(RandomVA5)
# only fit first 5 observations for a quick illustration
RandomVA5 <- RandomVA5[1:5, ]
## to get easy-to-read version of causes of death make sure the column
## orders match interVA5 standard input this can be monitored by checking
## the warnings of column names
sample.output1 <- InterVA5(RandomVA5, HIV = "h", Malaria = "l", write = FALSE,
directory = tempdir(), filename = "VA5_result", output = "extended", append = FALSE)
# }
# NOT RUN {
## to get causes of death with group code for further usage
sample.output2 <- InterVA5(RandomVA5, HIV = "h", Malaria = "l",
write = FALSE, directory = "VA test", filename = "VA5_result_wt_code", output = "classic",
append = FALSE, groupcode = TRUE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab