knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(TidyComb)
GetCid queries PubChem database via PUG REST to search matched CIDs of drugs according to other identifiers. Available identifiers are: name, SMILES, InChIKey.
GetCid(c("aspirin", "blebbistatin"), type = "name") GetCid("RDHQFKQIGNGIED-UHFFFAOYSA-N", type = "inchikey") GetCid("CC1(CCCN1)C2=NC3=C(C=CC=C3N2)C(=O)N.Cl.Cl", type = "smiles")
Drug name and synonyms from CID
GetPubNames(c(2244, 1))
Drug name and synonyms from Name
names <- c("Aspirin", "5-FU") synonyms <- GetPubSynonymFromName(names)
Drug properties
GetPubchemPro(c(2244, 1))
Max clinital trial phase: `GetPubPhase
GetPubPhase(c(2244, 1))
Check the database version information of ChEMBL
ChemblVersion()
Get ChEMBL ID and max clinical trial with InChI Key
GetChembl("PMATZTZNYRCHOR-CGLBZJNRSA-N")
Get DrugBank ID, KEGG compound ID, and ChEMBL ID with InChI Key from UniChem
GetIds(inchikey = "BSYNRYMUTXBXSQ-UHFFFAOYSA-N")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.