Request one specific drug information in KEGG
request_kegg_drug(drug_id = "D00001", return_form = c("list", "data.frame"))
drug id. For example, D00001
data.frame or list.
A data frame or list.
x = request_kegg_drug(drug_id = "D00001", return_form = "list")
x[1:2]
#> $ENTRY
#> Drug
#> "D00001"
#>
#> $NAME
#> [1] "Water (JP18/USP);"
#> [2] "Purified water (JP18);"
#> [3] "Purified water in containers (JP18);"
#> [4] "Water, purified (USP);"
#> [5] "Sterile purified water in containers (JP18);"
#> [6] "Water for injection (JP18);"
#> [7] "Water for injection in containers (JP18);"
#> [8] "Sterile water (TN)"
#>
y = request_kegg_drug(drug_id = "D00001", return_form = "data.frame")
head(y)
#> Lab.ID
#> Drug D00001
#> Compound.name
#> Drug Water (JP18/USP){}Purified water (JP18){}Purified water in containers (JP18){}Water, purified (USP){}Sterile purified water in containers (JP18){}Water for injection (JP18){}Water for injection in containers (JP18){}Sterile water (TN)
#> Formula mz CAS.ID HMDB.ID KEGG.ID PUBCHEM.ID CHEBI.ID CHEMBL.ID
#> Drug H2O 18.0106 7732-18-5 NA D00001 7847069 15377 NA
#> LIPIDMAPS.ID LIPIDBANK.ID DRUGBANK.ID From_human From_drug KEGG_DRUG.ID
#> Drug NA NA NA Yes Yes
#> Synonyms
#> Drug Water (JP18/USP){}Purified water (JP18){}Purified water in containers (JP18){}Water, purified (USP){}Sterile purified water in containers (JP18){}Water for injection (JP18){}Water for injection in containers (JP18){}Sterile water (TN)