life.test.simulation: Perform a life test simulation using planning values
In Auburngrads/SMRD: Statistical Methods For Reliability Data

Description Usage Arguments Value Examples

Perform a life test simulation using planning values

life.test.simulation(
  plan.values,
  n,
  censor.time = NULL,
  censor.number = NULL,
  my.title,
  number.sim = 2000,
  quantile.mark = NULL,
  number.points = 20,
  perc.low = 0.005,
  perc.high = 0.995,
  cex = 1,
  xlim = c(NA, NA),
  ylim = NULL,
  title.option = GetSMRDDefault("SMRD.TitleOption"),
  xlab = plan.values$time.units,
  print.bad.count = T,
  max.lines.to.plot = min(50, number.sim),
  save.data.list = NULL,
  number.detail = 5,
  force.from.gui = F,
  conf.level = GetSMRDDefault("SMRD.ConfLevel")/100,
  show.histogram = TRUE,
  band.method = GetSMRDDefault("SMRD.ConfidenceBandMethod"),
  mono.tran = FALSE,
  ...
)

`plan.values`
`n`
`censor.time`
`censor.number`
`my.title`
`number.sim`
`quantile.mark`
`number.points`
`perc.low`
`perc.high`
`cex`
`xlim`
`ylim`
`title.option`
`xlab`
`print.bad.count`
`max.lines.to.plot`
`save.data.list`
`number.detail`
`force.from.gui`
`conf.level`
`show.histogram`
`band.method`
`mono.tran`
`...`

A series of plots

## Not run: 
plan.values1 <- get.plan.values("Weibull", 
                                 beta = 2, 
                                 prob = .1, 
                                 time = 100, 
                                 time.units = "Hours")
                                 
life.test.simulation(plan.values1, 
                     n = 50,
                     censor.time = 120, 
                     number.detail = 5, 
                     quantile.mark = 0.2) 
                     
plan.values2 <- get.plan.values("Lognormal", 
                                sigma = 0.5,
                                prob = 0.1, 
                                time = 100, 
                                time.units = "Hours")

life.test.simulation(plan.values2, 
                     n = 50,
                     censor.time = 1000, 
                     quantile.mark = .1)

## End(Not run)