# NOT RUN {
BABSIM_HOSPITAL <- FALSE
if(BABSIM_HOSPITAL){
## babsim.hospital version must be greater equal 11.7:
ver <- unlist(packageVersion("babsim.hospital"))
if( ver[1] >= 11 & ver[2] >= 7){
x <- matrix(as.numeric(babsim.hospital::getParaSet(5374)[1,-1]),1,)
funBaBSimHospital(x)
}
}
# }
Run the code above in your browser using DataLab