Calculating differences in disease network characteristics before and after removal of drug targets
score_network(BasicData, n = 1000)
A BasicData object.
Number vector, the number of times random permutation sampling, default to 1000.
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) res <- score_network(BasicData, n = 100)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.