« View all new features in
Mathematica
9
◄
previous
|
next
►
New in
Mathematica
9
›
Enhanced Probability & Statistics
Splice the Body of a Distribution with New Tails
Add symmetric exponential tails to a normal distribution.
In[1]:=
X
dist1 = LaplaceDistribution[0, 3]; dist2 = NormalDistribution[0, 2]; \[ScriptCapitalD] = SplicedDistribution[{1, 1, 1}, {-\[Infinity], -1, 1, \[Infinity]}, {dist1, dist2, dist1}];
In[2]:=
X
plots = GraphicsGrid[ Partition[ Table[Plot[fun[\[ScriptCapitalD], x], {x, -5, 5}, Filling -> Axis, Exclusions -> None, PlotLabel -> fun, ImageSize -> 250], {fun, {PDF, CDF, HazardFunction, SurvivalFunction}}], 2, 2]]
Out[2]=