Новое в системе Wolfram
Mathematica
8: Непараметрические, вторичные и формульные распределения вероятностей
◄
предыдущая
|
следующая
►
Основные алгоритмы
Визуализация уровней значений плотности вероятности для трех независимых случайных величин
Изучение уровней значений плотности вероятности для трех независимых случайных величин, заданных с помощью
ProductDistribution
.
In[1]:=
X
\[ScriptCapitalD] = ProductDistribution[NormalDistribution[], ExponentialDistribution[0.5], LaplaceDistribution[0, 1]];
In[2]:=
X
Framed[ContourPlot3D[ Evaluate[PDF[\[ScriptCapitalD], {x, y, z}]], {x, -3, 3}, {y, 0, 5}, {z, -2.5, 2.5}, Mesh -> 10, MeshFunctions -> {#2 &}, MeshShading -> {Automatic, None}, Contours -> {{0.01, Lighter[Red, 0.2]}, {0.02, Lighter[Green, 0.3]}, {0.04, Lighter[Blue, 0.3]}}, AxesLabel -> Table[Style[ToString[MarginalDistribution[\[ScriptCapitalD], i]], 12, FontFamily -> "Verdana"], {i, 3}], ImageSize -> 450, Ticks -> False], RoundingRadius -> 10, FrameStyle -> GrayLevel@0.3, FrameMargins -> 10, ImageSize -> 500, Background -> LightYellow]
Out[2]=