This is a function to get Anatomical Therapeutic Chemical Classification System(ATC) code via Taiwan Health Insurance drug code(NHINo)

getATCViaNHINo(df, NHINoColName = NHINo)

Arguments

df

data.frame include NHINO

NHINoColName

A colum for NHINo of df

Value

Details

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.

Examples

# 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")): 沒有這個函數 "%>%"