可视化组件的预计寿命
已知组件具有参数为2和1000的韦伯分布,已经工作300小时. 求该组件在使用
小时后,仍然工作的概率.
prob = Probability[x ≥ ax ≥ 300, xWeibullDistribution[2, 1000], Assumptions -> a > 0];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"]]