Component Lifetime Distributions
Component Lifetime Distributions
The most common distributions in reliability.
dists = {ExponentialDistribution[(1/10)], WeibullDistribution[(1/5), (1/10)], GammaDistribution[1, 10], LogNormalDistribution[1, 1], ErlangDistribution[1, 1], ParetoDistribution[1, 1], GompertzMakehamDistribution[1, 1], BirnbaumSaundersDistribution[1, 1], HypoexponentialDistribution[{1, 1 / 5, 1 / 10}], HyperexponentialDistribution[{0.1, 0.9}, {0.2, 1.2}], CoxianDistribution[{0.6, 0.4}, {0.2, 1.2, 0.8}], GumbelDistribution[1, 1], FrechetDistribution[1, 1], RayleighDistribution[1], LogLogisticDistribution[1, 1], ChiSquareDistribution[0.5]};plots = ParallelTable[Plot[SurvivalFunction[𝒟, x], {x, Quantile[𝒟, 0.05], Min[50, Quantile[𝒟, 0.95]]}, PlotRange -> All, Filling -> Axis, Exclusions -> None, ImageSize -> 120, PlotLabel -> StringReplace[ToString[Head[𝒟]], "Distribution" -> ""], Frame -> True, FrameTicks -> None, Axes -> None, AxesOrigin -> {Quantile[𝒟, 0.05], 0}, FillingStyle -> RandomChoice[ColorData[55, "ColorList"]]], {𝒟, dists}];composite = Table[Hyperlink[Tooltip[Show[plots[[i]], ImageSize -> 120], Show[plots[[i]], ImageSize -> Large, PlotLabel -> dists[[i]], FrameTicks -> Automatic]], "paclet:ref/" <> ToString[Head[dists[[i]]]]], {i, Length[dists]}];Grid[Partition[Append[composite, Null], 4]]