immcp (version 1.0.3)

CreateDisDrugNet: CreateDisDrugNet

Description

Create Disease-Drug Network

Usage

CreateDisDrugNet(BasicData, drug, disease)

Arguments

BasicData

BasicData object.

drug

Character vector, the drug.

disease

Character vector, the disease.

Value

A igraph object.

Examples

# NOT RUN {
data(drugdemo)
drug_herb <- PrepareData(drugdemo$drug_herb, from = "drug", to="herb")
herb_compound <- PrepareData(drugdemo$herb_compound, from = "herb", to="compound")
compound_target <- PrepareData(drugdemo$compound_target, from = "compound", to="target")
disease <- PrepareData(drugdemo$disease, diseaseID = "disease",from = "target", to="target")
BasicData <- CreateBasicData(drug_herb, herb_compound, compound_target, diseasenet = disease)
DisDrugNet <- CreateDisDrugNet(BasicData, drug = "Drug1", disease = "disease")
# }