R/funPharm.R
, R/getATCViaNHINo.R
getATCViaNHINo.Rd
This is a function to get Anatomical Therapeutic Chemical Classification System(ATC) code via Taiwan Health Insurance drug code(NHINo)
getATCViaNHINo(df, NHINoColName = NHINo)
df | data.frame include NHINO |
---|---|
NHINoColName | A colum for NHINo of df |
This function filter the patient to be analyzed with the target indication drug, which encode in RxCui and be converted to ATC code by the function getATCViaRxCui()
.
User inputs the data frame with drug column which encoded in NHINo, then the output will add a column named ATC in the original input data frame.
# sample of getting ATC code via NHINo. head(getATCViaNHINo(df = sample_nhino_code,NHINoColName = NHINo))#> Error in df %>% left_join(resATC, by = c(NHINo = "nhino")): 沒有這個函數 "%>%"