Skip to contents

Creates a column `other_natural_present` if opioid death involved opium

Source: R/flag_other_natural_present.R
flag_other_natural_present.Rd

Note that ICD9 years did not include an other_natural 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 other natural/semi-synthetic opioids.

Usage

flag_other_natural_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 on opioid deaths (`opioid_death == 1`); if `FALSE`, it fires wherever the code appears (including contributory-only records) and the caller is 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 = "T402")
df |>
    flag_opioid_deaths(year = 2019) |>
    flag_other_natural_present(year = 2019)
#>   year ucod f_records_all opioid_death other_natural_present
#> 1 2019  X42          T402            1                     1