Description Usage Arguments Examples
Title
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | get.alt.plan.values.from.slope.and.point(
distribution,
relationship,
slope,
probs,
accelvar,
censor.time,
beta,
sigma,
time.units = "Time",
accelvar.units,
power = NULL,
use.conditions = NULL
)
|
distribution |
|
relationship |
|
slope |
|
probs |
|
accelvar |
|
censor.time |
|
beta |
|
sigma |
|
time.units |
|
accelvar.units |
|
power |
|
use.conditions |
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 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 | ## Not run:
AdhesiveBond.Weibull.altpv <- get.alt.plan.values.from.slope.and.point(distribution = "Weibull",
relationship = "Arrhenius",
accelvar.units = c("DegreesC"),
time.units = "Days",
censor.time = 183,
probs = c(.001),
accelvar = c(50),
slope = 0.726,
beta = 1.667)
print(AdhesiveBond.Weibull.altpv)
AdhesiveBond1.altplan <- get.alt.test.plan.direct(accel.variable.levels = c(78,98,120),
number.of.units = c(155,60,84),
censor.times = c(183,183,183))
AdhesiveBond2.altplan <- get.alt.test.plan.direct(accel.variable.levels = c(80,100,120),
number.of.units = c(212,88,0),
censor.times = c(243,243,243))
AdhesiveBond3.altplan <- get.alt.test.plan.direct(accel.variable.levels = c(80,100,120),
number.of.units = c(150,60,90),
censor.times = c(243,243,243))
plot(AdhesiveBond1.altplan,
ALT.plan.values = AdhesiveBond.Weibull.altpv,
use.condition = 50)
plot(AdhesiveBond2.altplan,
ALT.plan.values = AdhesiveBond.Weibull.altpv,
use.condition = 50)
plot(AdhesiveBond3.altplan,
ALT.plan.values = AdhesiveBond.Weibull.altpv,
use.condition = 50)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.