To add a new column with the initial daily dose. To add multiple columns use addDrugUtilisation() for efficiency.

To add a new column with the initial daily dose. To add multiple columns use addDrugUtilisation() for efficiency.

Usage

addInitialDailyDose(
  cohort,
  ingredientConceptId,
  conceptSet = NULL,
  indexDate = "cohort_start_date",
  censorDate = "cohort_end_date",
  restrictIncident = TRUE,
  nameStyle = "initial_daily_dose_{concept_name}_{ingredient}",
  name = NULL
)

Arguments

cohort: A cohort_table object.
ingredientConceptId: Ingredient OMOP concept that we are interested for the study.
conceptSet: List of concepts to be included.
indexDate: Name of a column that indicates the date to start the analysis.
censorDate: Name of a column that indicates the date to stop the analysis, if NULL end of individuals observation is used.
restrictIncident: Whether to include only incident prescriptions in the analysis. If FALSE all prescriptions that overlap with the study period will be included.
nameStyle: Character string to specify the nameStyle of the new columns.
name: Name of the new computed cohort table, if NULL a temporary table will be created.

Value

The same cohort with the added column.

Examples

# \donttest{
library(DrugUtilisation)
library(CodelistGenerator)
library(dplyr, warn.conflicts = FALSE)

cdm <- mockDrugUtilisation()
codelist <- getDrugIngredientCodes(cdm = cdm, name = "acetaminophen")
cdm <- generateDrugUtilisationCohortSet(cdm = cdm,
                                        name = "dus_cohort",
                                        conceptSet = codelist)
#> ℹ Subsetting drug_exposure table
#> ℹ Checking whether any record needs to be dropped.
#> ℹ Collapsing overlaping records.
#> ℹ Collapsing records with gapEra = 1 days.

cdm$dus_cohort |>
  addInitialDailyDose(ingredientConceptId = 1125315) |>
  glimpse()
#> Rows: 5
#> Columns: 5
#> $ cohort_definition_id                                      <int> 1, 1, 1, 1, 1
#> $ subject_id                                                <int> 5, 6, 7, 9, 9
#> $ cohort_start_date                                         <date> 2022-08-26, …
#> $ cohort_end_date                                           <date> 2022-10-26, …
#> $ initial_daily_dose_ingredient_1125315_descendants_1125315 <dbl> 32.25806, 3…
# }