# \donttest{
library(CodelistGenerator)
library(omopgenerics)
cdm <- mockVocabRef()
codes <- subsetOnDoseUnit(x = newCodelist(list("codes" = c(20,21))),
cdm = cdm,
doseUnit = c("milligram"))
codes
# }
Run the code above in your browser using DataLab