ProxelBE | R Documentation |
This function calculates the isntantaneous unavailablity/reliabality values of a basic event.
ProxelBE(BE, state, totaltime, delta, tol)
BE |
a list containing states, transition matrix, distributions and their parameters for a basic event |
state |
a string value for the state |
totaltime |
an integer value for the total time |
delta |
a numeric value as time step |
tol |
a numeric value for the tolerance level |
For a multistate event, if the state is IS this function returns a vector of instantaneous probabilities of being in the intermediate state
a numeric vector of instantaneous unavailabilities when the state is F
#A multi-state basic event with Weibull(2, 3) transition distribution function #from working (OK) to an Intermediate State (IS), a fixed time of 0.5 transtion #from IS to failure (F), and a fixed repair time of 0.1 (transition from state F to state OK). delta <- 0.1 BE <- list( states = c("OK", "IS", "F"), G = rbind( c(NA, 1, 0), c(0, NA, 1), c(1, 0, NA) ), dist = c("weibull", "unif", "unif"), param = list(c(2, 3), c(0.5 - delta, 0.5 + delta), c(0.1 - delta, 0.1 + delta)) ) probIS <- ProxelBE(BE, state = "IS", totaltime = 5, delta = 0.2, tol = 0.000000001) plot(probIS, type = "l")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.