WOLFRAM

Wolfram Language & System Documentation Center

Visualize the Projected Lifetime of a Component

Find the probability that a component is still working after hours, given that it has survived for 300 hours, if the component has a Weibull distribution with parameters 2 and 1000.

    
Wolfram Language code: prob = Probability[x ≥ ax ≥ 300, xWeibullDistribution[2, 1000], Assumptions -> a > 0];
Wolfram Language code: Labeled[Plot[prob, {a, 0, 1700}, PlotRange -> {0, 1}, Filling -> Axis, PlotStyle -> Thick, FillingStyle -> Hue[.1, .8, .9], ImageSize -> 400], Style[Row[{"Pr[Life ≥ a  Life ≥ 300] = ", prob}], FontFamily -> "Verdana"]]