Новое в системе Wolfram
Mathematica
8: Оценивание параметров распределений и проверка статистических гипотез
◄
предыдущая
|
следующая
►
Основные алгоритмы
Выбор параметрических тестов или их непараметрических аналогов
Тестирование равенста векторов сдвига четырёхмерных данных с помощью ряда параметрических и непараметрических тестов.
In[1]:=
X
BlockRandom[SeedRandom[42]; data1 = RandomVariate[ MultinormalDistribution[{.25, .25, 0, .5}, IdentityMatrix[4]], 50]; data2 = RandomVariate[ MultinormalDistribution[{-.25, -.25, 0, .25}, IdentityMatrix[4]], 50]];
In[2]:=
X
Labeled[BubbleChart3D[{data1, data2}, ChartStyle -> {Directive[{Specularity[White, 10], Orange}], Directive[{Specularity[White, 10], Purple}]}, PerformanceGoal -> "Quality", ImageSize -> 250], Insert[LocationTest[{data1, data2}, Automatic, {"TestDataTable", All}], ItemStyle -> Bold, {1, 2}], {Right, Bottom}]
Out[2]=