Loewe {synergyfinder} | R Documentation |
Loewe
calculates the synergy score matrix from a dose-response matrix
by using a druginteraction reference model introduced by Loewe in 1953.
Loewe(response.mat, quiet = TRUE, drug.col.model = NULL, drug.row.model = NULL)
response.mat |
A drug cobination dose-response matrix. It's column name and row name are representing the concerntrations of drug added to column and row, respectively. The values in matrix indicate the inhibition rate to cell growth. |
quiet |
A logical value. If it is |
drug.col.model |
(optional) a character. It indicates the model used for fitting dose-response curve for drug added to columns. |
drug.row.model |
(optional) a character. It indicates the model type used for fitting dose-response curve for drug added to rows. |
Loewe model is a reference model for evaluating the combination
effect of two drugs. The basic assumption of this model is "The referece
effect of drug combination is the expected effect of a drug combined with
itself".
The optional arguments drug.col.model
, drug.row.model
are
designed for reuse the single drug dose response model fitting results,
if it has been down before. Functions FitDoseResponse
and
ExtractSingleDrug
could be used to calculate these arguments.
A matrix for Synergy score calculated via reference model introduced by Loewe, S.
Liye He liye.he@helsinki.fi
Jing Tang jing.tang@helsinki.fi
Shuyu Zheng shuyu.zheng@helsinki.fi
Yadav B, Wennerberg K, Aittokallio T, Tang J.(2015). Searching for Drug Synergy in Complex Dose-Response Landscape Using an Interaction Potency Model.Comput Struct Biotechnol J, 13:504– 513.
[Loewe, 1953] Loewe, S. (1953). The problem of synergism and antagonism of combined drugs. Arzneimittelforschung, 3(6):285–290.
# No single drug fitted modle before data("mathews_screening_data") data <- ReshapeData(mathews_screening_data) response.mat <- data$dose.response.mats[[1]] Loewe.score <- Loewe(response.mat) # Single drug dose response models have been fitted before. drug.row.model <- FitDoseResponse(ExtractSingleDrug(response.mat, dim="row")) drug.col.model <- FitDoseResponse(ExtractSingleDrug(response.mat, dim="col")) Loewe.score2 <- Loewe(response.mat, drug.col.model=drug.col.model, drug.row.model=drug.row.model)