get.alt.plan.values.from.slope.and.point: Title

Description Usage Arguments Examples

Description

Title

Usage

 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
)

Arguments

distribution
relationship
slope
probs
accelvar
censor.time
beta
sigma
time.units
accelvar.units
power
use.conditions

Examples

 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)

Auburngrads/SMRD documentation built on Sept. 14, 2020, 2:21 a.m.