View source: R/ExpectedLifetime.R
expectedSystemLifetimeExp | R Documentation |
Computes the expected lifetime of a system/network specified by its signature or graph structure when the components have Exponential lifetime distribution with specified rate. Useful for ordering systems/networks by expected lifetime.
expectedSystemLifetimeExp(sys, rate=1)
expectedNetworkLifetimeExp(sys, rate=1)
expectedSignatureLifetimeExp(s, rate=1)
sys |
a |
s |
the signature vector of the system/network whose expected lifetime is to be computed. |
rate |
the rate parameter of the Exponential distribution. |
The system or network is specified by means of a system
object, whereby each end of the system is denoted by nodes named s
and t
which are taken to be perfectly reliable. It is easy to construct the appropriate reliability block diagram representation using the function createSystem
. Note that each physically distinct component should be separately numbered when constructing this object.
Alternatively, the signature may be provided instead (the other functions simply use the graph object to compute the signature).
All the functions return a single scalar value which is the expected lifetime.
Please feel free to email louis.aslett@durham.ac.uk with any queries or if you encounter errors when running this function.
Louis J.M. Aslett louis.aslett@durham.ac.uk (https://www.louisaslett.com/)
Samaniego, F. J. (2007), System Signatures and Their Applications in Engineering Reliability, Springer.
computeSystemSignature
# Find the expected lifetime of two component series system
expectedSystemLifetimeExp(createSystem(s -- 1 -- 2 -- t))
# Find the expected lifetime of two component series system using it's signature
# directly
expectedSignatureLifetimeExp(c(1,0))
# Find the expected lifetime of two component parallel system
expectedSystemLifetimeExp(createSystem(s -- 1:2 -- t))
# Find the expected lifetime of two component parallel system using it's
# signature directly
expectedSignatureLifetimeExp(c(0,1))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.