Simple function to get only the pregnancy event dates.

Simple function to get only the pregnancy event dates.

Usage

get_pregnancy_dates(lpr2, lpr3)

Arguments

lpr2

Output from join_lpr2().

lpr3

Output from join_lpr3().

Value

The same type as the input data, default as a tibble::tibble().

See also

See the vignette("algorithm") for the logic used to filter these patients.

Examples

if (FALSE) { # \dontrun{
register_data <- simulate_registers(
  c("lpr_adm", "lpr_diag", "kontakter", "diagnoser"),
  n = 1000
)
lpr2 <- prepare_lpr2(register_data$lpr_adm, register_data$lpr_diag)
lpr3 <- prepare_lpr3(register_data$diagnoser, register_data$kontakter)
get_pregnancy_dates(lpr2, lpr3)
} # }