New in Wolfram
Mathematica
8: Probability and Statistics Solvers and Properties
◄
previous
|
next
►
Core Algorithms
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.
In[1]:=
X
prob = Probability[x >= a \[Conditioned] x >= 300, x \[Distributed] WeibullDistribution[2, 1000], Assumptions -> a > 0];
In[2]:=
X
Labeled[Plot[prob, {a, 0, 1700}, PlotRange -> {0, 1}, Filling -> Axis, PlotStyle -> Thick, FillingStyle -> Hue[.1, .8, .9], ImageSize -> 400], Style[Row[{"Pr[Life \[GreaterEqual] a \[Conditioned] Life \ \[GreaterEqual] 300] = ", prob}], FontFamily -> "Verdana"]]
Out[2]=