thres3(k1, k2, k3, rho,
costs = matrix(c(0, 1, 1, rho[1]/rho[2], 0, rho[3]/rho[2], 1, 1, 0),
3, 3, byrow = TRUE), dist1 = "norm", dist2 = "norm",
dist3 = "norm", start = NULL, ci.method = c("param", "boot"),
B = 1000, alpha = 0.05, na.rm = FALSE)"norm". See Details."norm". See Details."norm". See Details.dist1, dist2 and dist3 are "norm", a 2-dimensional vector containing starting values for the thresholds. The authors recommend to use the mean of the distribution with lower "param". See Details.ci.method="boot". Otherwise, ignored. Default, 1000.NA values in k1, k2 and k3 should be stripped before the computation proceeds. Default, FALSE.thres3, which is a list with two components:thres1 first threshold estimate.
thres2 second threshold estimate.
prev prevalences provided by the user.
costs cost matrix provided by the user.
k1 vector containing the first sample values provided by the user.
k2 vector containing the second sample values provided by the user.
k3 vector containing the third sample values provided by the user.
dist1 distribution assumed for the first population.
dist2 distribution assumed for the second population.
dist3 distribution assumed for the third population.
When not all distributions are normal, T also contains:
pars1 a numeric vector containing the estimation of the parameters of dist1.
pars2 a numeric vector containing the estimation of the parameters of dist2.
pars3 a numeric vector containing the estimation of the parameters of dist3.ci.method="param", a list of six components:
lower1 the lower limit of the confidence interval for the first threshold.
upper1 the upper limit of the confidence interval for the first threshold.
lower2 the lower limit of the confidence interval for the second threshold.
upper2 the upper limit of the confidence interval for the second threshold.
alpha significance level provided by the user.
ci.method method used for the confidence intervals computation.
When ci.method="boot", a list of eleven components:
low.norm1 the lower limit of the bootstrap confidence interval for the first threshold based on the normal distribution.
up.norm1 the upper limit of the bootstrap confidence interval for the first threshold based on the normal distribution.
low.norm2 the lower limit of the bootstrap confidence interval for the second threshold based on the normal distribution.
up.norm2 the upper limit of the bootstrap confidence interval for the second threshold based on the normal distribution.
low.perc1 the lower limit of the bootstrap confidence interval for the first threshold based on percentiles.
up.perc1 the upper limit of the bootstrap confidence interval for the first threshold based on percentiles.
low.perc2 the lower limit of the bootstrap confidence interval for the second threshold based on percentiles.
up.perc2 the upper limit of the bootstrap confidence interval for the second threshold based on percentiles.
alpha significance level.
B number of bootstrap resamples.
ci.method method used for the confidence intervals computation.dist1, dist2 and dist3 can be chosen between the following 2-parameter distributions: "beta", "cauchy", "chisq" (chi-squared), "gamma", "lnorm" (lognormal), "logis" (logistic), "norm" (normal) and "weibull".
For parameter ci.method the user can choose between "param" (parametric confidence intervals are computed when assuming a trinormal underlying model) and "boot" (the confidence intervals are computed by bootstrap).
When at least one of the distributions is not "norm", the function internally uses the thresTH3() function, which requires two intervals in which the two thresholds are expected to be found. These intervals are determined by the default values of thresTH3(). When all the distributions are "norm", the function uses the nlm() function, which requires two starting values (passed through the argument start).thresTH3, plot.thres3, lines.thres3set.seed(1234)
n <- 100
k1 <- rlnorm(n)
k2 <- rnorm(n, 3, 1)
k3 <- rnorm(n, 5, 1)
rho <- c(1/3, 1/3, 1/3)
# assuming trinormality
start <- c(mean(k1), mean(k3))
thres3(k1, k2, k3, rho, dist1="norm", dist2="norm", dist3="norm", start=start, ci.method="param")
# not assuming trinormality
thres3(k1, k2, k3, rho, B=1000, ci.method="boot", dist1="lnorm", dist2="norm", dist3="norm")Run the code above in your browser using DataLab