.computeZIPdelta | R Documentation |
Following the calculation of ZIP delta score as in Appendix A3. See reference for details.
.computeZIPdelta(
treatment1id,
treatment2id,
treatment1dose,
treatment2dose,
sampleid,
HS_1,
HS_2,
EC50_1,
EC50_2,
E_inf_1,
E_inf_2,
combo_viability,
ZIP = NULL,
residual = "logcosh",
nthread = 1L,
show_Rsqr = FALSE
)
treatment1id |
|
treatment2id |
|
treatment1dose |
|
treatment2dose |
|
sampleid |
|
HS_1 |
|
HS_2 |
|
EC50_1 |
|
EC50_2 |
|
E_inf_1 |
|
E_inf_2 |
|
combo_viability |
|
ZIP |
|
residual |
|
nthread |
|
show_Rsqr |
|
numeric
delta scores of every dose combinations for any given treatment combinations.
Yadav, B., Wennerberg, K., Aittokallio, T., & Tang, J. (2015). Searching for Drug Synergy in Complex Dose–Response Landscapes Using an Interaction Potency Model. Computational and Structural Biotechnology Journal, 13, 504–513. https://doi.org/10.1016/j.csbj.2015.09.001
## Not run:
## ZIP is optional. Will be recomputed if not provided.
combo_profiles <- CoreGx::buildComboProfiles(
tre,
c("HS", "EC50", "E_inf", "ZIP", "combo_viability"))
combo_profiles[,
.computeZIPdelta(
treatment1id = treatment1id,
treatment2id = treatment2id,
treatment1dose = treatment1dose,
treatment2dose = treatment2dose,
sampleid = sampleid,
HS_1 = HS_1, HS_2 = HS_2,
EC50_1 = EC50_1, EC50_2 = EC50_2,
E_inf_1 = E_inf_1, E_inf_2 = E_inf_2,
combo_viability = combo_viability,
ZIP = ZIP,
nthread = 4,
show_Rsqr = TRUE
)
] -> delta_scores
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.