meanR
computes the meanR statistic for the provided model
and returns the computed F-statistic and the estimated p-value. p-value
can be calculated either by assuming an exact distribution or using
bootstrapping procedure. In the latter case, null distribution of
bootstrapped F-statistics is also returned.
meanR(
data,
fitResult,
transforms = fitResult$transforms,
null_model = c("loewe", "hsa", "bliss", "loewe2"),
R,
CP,
reps,
nested_bootstrap = FALSE,
B.B = NULL,
B.CP = NULL,
cl = NULL,
method = c("equal", "model", "unequal"),
...
)
Dose-response dataframe.
Monotherapy (on-axis) model fit, e.g. produced by
fitMarginals
. It has to be a "MarginalFit"
object or a
list containing df
, sigma
, coef
,
shared_asymptote
and method
elements for, respectively,
marginal model degrees of freedom, residual standard deviation, named
vector of coefficient estimates, logical value of whether shared asymptote
is imposed and method for estimating marginal models during bootstrapping
(see fitMarginals
). If biological and power transformations
were used in marginal model estimation, fitResult
should contain
transforms
elements with these transformations. Alternatively, these
can also be specified via transforms
argument.
Transformation functions. If non-null, transforms
is
a list containing 5 elements, namely biological and power transformations
along with their inverse functions and compositeArgs
which is a list
with argument values shared across the 4 functions. See vignette for more
information.
Specified null model for the expected response surface.
Currently, allowed options are "loewe"
for generalized Loewe model,
"hsa"
for Highest Single Agent model, "bliss"
for Bliss additivity,
and "loewe2"
for the alternative Loewe generalization.
Numeric vector containing mean deviation of predicted response
surface from the observed one at each of the off-axis points. If missing,
it will be calculated automatically from output of
predictOffAxis
function.
Matrix which is part of covariance matrix for the R
argument
Numeric vector containing number of replicates for each off-axis
dose combination. If missing, it will be calculated automatically from output
of predictOffAxis
function.
When statistics are calculated, if
nested_bootstrap = TRUE
, CP
matrix is recalculated at each
bootstrap iteration of B.B
using B.CP
iterations. Using such
nested bootstrap may however significantly increase computational time. If
nested_bootstrap = FALSE
, CP
bootstrapped data reuses
CP
matrix calculated from the original data.
Number of iterations to use in bootstrapping null distribution for either meanR or maxR statistics.
Number of bootstrap iterations to use for CP matrix estimation
If parallel computations are desired, cl
should be a cluster
object created by makeCluster
. If parallel
computing is active, progress reporting messages are not necessarily
ordered as it should be expected.
What assumption should be used for the variance of on- and
off-axis points. This argument can take one of the values from
c("equal", "model", "unequal")
. With the value "equal"
as the
default. "equal"
assumes that both on- and off-axis points have the
same variance, "unequal"
estimates a different parameter for on- and
off-axis points and "model"
predicts variance based on the average
effect of an off-axis point. If no transformations are used the
"model"
method is recommended. If transformations are used, only the
"equal"
method can be chosen.
Further arguments that will be later passed to
generateData
function during bootstrapping
This function returns a meanR
object with estimates for the
meanR statistical test. meanR
object is essentially a list with
appropriately named elements.
meanR
object list includes notably the calculated F-statistic,
p-value and degrees of freedom ("n1"
and "df0"
respectively)
used to find the critical value of the F-distribution under the null.
If meanR
test is run with bootstrapping, then p-value
estimate is based on boostrapped null distribution of test statistic and an
additional element "FDist"
(of class "ecdf"
) is returned.
# NOT RUN {
data <- subset(directAntivirals, experiment == 2)
## Data must contain d1, d2 and effect columns
fitResult <- fitMarginals(data)
CP <- CPBootstrap(data, fitResult, null_model = "loewe", B.CP = 5)
meanR(data, fitResult, null_model = "loewe", CP = CP)
# }
Run the code above in your browser using DataLab