Description Usage Arguments Details Value Examples
View source: R/FunctionsPODBAYEfficacy.R
Function calculates the PoDBAY efficacy based on the set of PoD curve parameters calculated in PoDParamEstimation
function, vaccinated and control immunogenicity subset means and standard deviations.
1 2 3 4 5 6 | PoDBAYEfficacy(estimatedParameters,
blindVaccinated,
blindControl,
adjustTiters = FALSE,
adjustFrom = log2(10),
adjustTo = log2(5))
|
estimatedParameters |
named data frame ("pmax", "slope", "et50"): set of estimated PoD curve parameters |
blindVaccinated |
|
blindControl |
|
adjustTiters |
boolean: set to TRUE if titer values should be adjusted, for details see |
adjustFrom |
numeric: value specifying the detection limit, all values below the detection limit will be adjusted to adjustTo value |
adjustTo |
numeric: value to which titers below the detection limit will be adjusted |
Application of efficacyComputation
function to the all PoD curves (each characterized by three PoD parameters) estimated by PoDParamEstimation
function.
Inputs into the efficacyComputation
are:
PoDParameters: i'th estimated PoD parameters from PoDParamEstimation
. i = 1, ..., N, where N = number of estimations in which MLE converges. See PoDMLE
for details.
means: jittered means of immunogenicity subset. See JitterMeans
for details.
standardDeviations: standard deviations of the vaccinated and control subjects from the immunogenicity subset.
efficacySet, set of PoDBAY effficacies corresponding to estimated set of PoD curve parameters
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 | ## Data preparation
data(diseased)
data(nondiseased)
data(estimatedParameters)
## Example 1
# Creating imunogenicity subset, method = "Ratio", value = 4
ImmunogenicitySubset <-
BlindSampling(diseased,
nondiseased,
method = list(name = "Ratio",
value = 4))
# Estimating PoD curve parameters
nondiseasedGenerationCount <- nondiseased$N
estimatedParameters <- PoDParamEstimation(diseased$titers,
ImmunogenicitySubset$ImmunogenicityNondiseased$titers,
nondiseasedGenerationCount,
repeatCount = 10)
# Estimating PoDBAY efficacy
PoDBAYEfficacy(estimatedParameters$results,
ImmunogenicitySubset$ImmunogenicityVaccinated,
ImmunogenicitySubset$ImmunogenicityControl)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.