WOLFRAM

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

ハザード関数が与えられている分布を定義する

ハザード関数は与えられている：
Wolfram Language code: h[x_] := Piecewise[{{1, x < 1}, {Exp[-x], x ≥ 1}}]
ハザード関数を使ってProbabilityDistributionを定義する：
Wolfram Language code: 𝒟 = ProbabilityDistribution[{"HF", h[x]}, {x, 0, ∞}]
分布関数：
Wolfram Language code: GraphicsGrid[Partition[Table[Plot[fun[𝒟, x], {x, 0, 4}, Filling -> Axis, PlotLabel -> fun, ImageSize -> 200], {fun, {PDF, CDF, HazardFunction, SurvivalFunction}}], 2, 2]]
シミュレーションを行い，ヒストグラムをプロットする：
Wolfram Language code: data = RandomVariate[𝒟, 10 ^ 5]; Histogram[data, {0, 6, .1}, "PDF", ImageSize -> 300]