R/Extract_diagnosis_admission.R

In belayb/JigsawEHR: Analysis pipline for JIGSAW project (JigsawEHR)

#' Make a diagnosis table at admission
#'
#' @param data a spark data frame
#' @param diagnosis a character (list of character vector) specifying the condition(s) of interest
#'
#' @return
#' @export
#'
#' @examples
Extract_diagnosis_admission <- function(data, diagnosis){

}