View source: R/wei_homogeneous_series.R
| wei_homogeneous_series | R Documentation |
Constructs a dist_structure for a series of Weibull components sharing
a common shape parameter. By the standard identity, the system lifetime
is itself Weibull with the common shape and an aggregate scale
(sum(1 / scale^shape))^(-1 / shape). Methods for surv, cdf,
sampler, and mean forward to this aggregate Weibull, giving exact
closed-form values.
wei_homogeneous_series(shape, scales)
## S3 method for class 'wei_homogeneous_series'
surv(x, ...)
## S3 method for class 'wei_homogeneous_series'
sampler(x, ...)
## S3 method for class 'wei_homogeneous_series'
mean(x, ...)
shape |
Positive scalar: common Weibull shape. |
scales |
Positive numeric vector: per-component Weibull scales. |
x |
A |
... |
Ignored. |
wei_homogeneous_series() returns an object of class
c("wei_homogeneous_series", "wei_series", "series_dist", "coherent_dist", "dist_structure", "univariate_dist", "continuous_dist", "dist").
The associated S3 methods return:
surv(): a closure function(t, ...).
cdf() is derived via the dist_structure default and returns
a closure function(t, ...) equal to 1 - surv(x)(t).
sampler(): a closure function(n, ...) returning n random
variates from the system lifetime distribution.
mean(): a numeric scalar (the mean system lifetime,
aggregate_scale * gamma(1 + 1 / shape)).
sys <- wei_homogeneous_series(shape = 2, scales = c(1, 2, 3))
# System lifetime is Weibull(shape = 2, scale = aggregate_scale)
algebraic.dist::surv(sys)(1)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.