CvMcens | R Documentation |
Function CvMcens
computes the Cramér-von Mises statistic and p-value for complete
and right-censored data against eight possible distributions.
## Default S3 method:
CvMcens(times, cens = rep(1, length(times)),
distr = c("exponential", "gumbel", "weibull", "normal",
"lognormal", "logistic", "loglogistic", "beta"),
betaLimits = c(0, 1), igumb = c(10, 10), BS = 999,
params0 = list(shape = NULL, shape2 = NULL,
location = NULL, scale = NULL), tol = 1e-04, ...)
## S3 method for class 'formula'
CvMcens(formula, data, ...)
times |
Numeric vector of times until the event of interest. |
cens |
Status indicator (1, exact time; 0, right-censored time). If not provided, all times are assumed to be exact. |
distr |
A string specifying the name of the distribution to be studied.
The possible distributions are the exponential ( |
betaLimits |
Two-components vector with the lower and upper bounds of the Beta distribution. This argument is only required, if the beta distribution is considered. |
igumb |
Two-components vector with the initial values for the estimation of the Gumbel distribution parameters. |
BS |
Number of bootstrap samples. |
params0 |
List specifying the parameters of the theoretical distribution.
By default, parameters are set to |
tol |
Precision of survival times. |
formula |
A formula with a numeric vector as response (which assumes no censoring) or |
data |
Data frame for variables in |
... |
Additional arguments. |
Koziol and Green (1976) proposed a Cramér-von Mises statistic for randomly censored data. This function reproduces this test for a given survival data and a theorical distribution. In presence of ties, different authors provide slightly different definitions of the product-limit estimator, what might provide different values of the test statistic.
The parameter estimation is acomplished with the fitdistcens
function of the fitdistrplus package.
To avoid long computation times due to bootstrapping, an alternative
with complete data is the function cvm.test
of the goftest package.
The precision of the survival times is important mainly in the data generation step of the bootstrap samples.
CvMcens
returns an object of class "CvMcens"
.
An object of class "CvMcens"
is a list containing the following components:
Distribution |
Null distribution. |
Hypothesis |
Parameters under the null hypothesis (if |
Test |
Vector containing the value of the Cramér-von Mises statistic ( |
Estimates |
Vector with the maximum likelihood estimates of the parameters of the distribution under study. |
StdErrors |
Vector containing the estimated standard errors. |
aic |
The Akaike information criterion. |
bic |
The so-called BIC or SBC (Schwarz Bayesian criterion). |
BS |
The number of bootstrap samples used. |
If the amount of data is large, the execution time of the
function can be elevated. The parameter BS
can
limit the number of random censored samples generated and
reduce the execution time.
K. Langohr, M. Besalú, M. Francisco, A. Garcia, G. Gómez.
J. A. Koziol and S. B. Green. A Cramér-von Mises statistic for randomly censored data. In: Biometrika, 63 (3) (1976), 465-474.
A. N. Pettitt and M. A. Stephens. Modified Cramér-von Mises statistics for censored data. In: Biometrika, 63 (2) (1976), 291-298.
Function cvm.test
(Package goftest) for complete data and
gofcens for statistics and p-value of Kolmogorov-Smirnov,
Cramér von-Mises and Anderson-Darling together for right-censored data.
# Complete data
set.seed(123)
CvMcens(times = rweibull(100, 12, scale = 4), distr = "weibull",
BS = 199)
print(CvMcens(times = rweibull(100, 12, scale = 4), distr = "normal",
BS = 99), degs = 4, print.AIC = FALSE, print.BIC = FALSE)
## Not run:
# Censored data
set.seed(123)
colonsamp <- colon[sample(nrow(colon), 300), ]
CvMcens(Surv(time, status) ~ 1, colonsamp, distr = "normal")
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.