Skip to contents

Creates a column called `opium_present` if opioid death involved opium

Source: R/flag_opium_present.R
flag_opium_present.Rd

Note that ICD9 years did not include an opium code. We code it as 0 by default, but can be coded however specified in missing_val parameter. This function flags all opioid deaths that involved opium.

Usage

flag_opium_present(
  processed_df,
  year = NULL,
  missing_val = 0,
  opioid_deaths_only = TRUE
)

Arguments

processed_df

MCOD dataframe already processed

year

if NULL, will attempt to detect

missing_val

value to indicate missing (i.e., code did not exist)

opioid_deaths_only

if `TRUE` (default) the flag fires only when the record is an opioid death (`opioid_death == 1`); if `FALSE`, it fires wherever the opioid code appears (including contributory-only records that are not opioid deaths) – the caller is then expected to `filter(opioid_death == 1)` themselves.

Value

a new dataframe with 1 additional column

Examples

df <- data.frame(year = 2019, ucod = "X42", f_records_all = "T400")
df |>
    flag_opioid_deaths(year = 2019) |>
    flag_opium_present(year = 2019)
#>   year ucod f_records_all opioid_death opium_present
#> 1 2019  X42          T400            1             1