Description Usage Arguments Value Author(s) See Also Examples
An alternative method to combine toxicities across the trials. Accordingly, we estimate the pooled toxicity probability at dose level x using the
R_c(x) = ∑_{i=1}^{R} \frac{σ_{i}^2 (x)}{σ^{2}(x)} \bar{R_i}(x),
where
σ_{i}^2(x) = N_i(x)\bar{R_i}(x)(1-\bar{R_i}(x))
and
σ^{2}(x) = ∑_{i=1}^{R} σ_i^2 (x), x \in D.
Then, to find the pooled estimates of MTD you can use either (a) the non-parametric pooled MTD estimator can be definied by the dose x_0 \in D such that:
|R_c(\hat{x_0}) - θ| <= |R_c(x) - θ|, x \neq \hat{x_0}
OR (b) the model-based algorithm.
1 | VarWT(dataTox, saveName)
|
dataTox |
a data frame containing information for each patient at each simulation and trial. |
saveName |
the name of the .txt output which will be created and saved in the current working directory; must be in characters; defaults to NULL. If saveName = NULL, means that nothing will be saved in the working directory. |
A list is returned, combining the toxicities across the trials. The output, generated by the function VarWT, contains the following components:
dataTox |
A data frame containing the estimated pooled toxicity probabilities at each dose level for each simulation. |
If saveName is not equal to "NULL" then a .txt file is saved in the working directory storing the estimated pooled toxicity probabilities at each dose level for each simulation.
Artemis Toumazi <artemis.toumazi@gmail.com>, Sarah Zohar <sarah.zohar@inserm.fr>, Anand N. Vidyashankar <avidyash@gmu.edu>, Jie Xu <jxu13@gmu.edu> and Moreno Ursino <moreno.ursino@inserm.fr>
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 | ## Not run:
## Using the toxicity dataset for each simulation and each trial, which is
## existing in the dfmeta package.
data("Toxdata")
dim(Toxdata)
colnames(Toxdata)
## NOTE: The toxicity dataset must have the same structure as below. ##
## Check it before running the VarWT function! ##
str(Toxdata)
#################################
## Running the VarWT function! ##
#################################
WT <- VarWT(Toxdata)
######### If we want to save the result in a text file ###########
####### we need to give a name in the argument "saveName" ########
WT <- VarWT(Toxdata, tempdir())
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.