WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

成分の予測される寿命を可視化する

あるコンポーネントが300時間存続したとして，このコンポーネントが母数2と1000のWeibull分布に従う場合に，まだ 時間作動し続ける確率を求める．

    
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"]]