Оценивание параметров распределения по данным выживаемости 

Использование методов максимального правдоподобия команды EstimatedDistribution для получения наилучшего соответствия распределения WeibullDistribution с цензурированными данными и сравнение с оценкой Каплана-Майера.

In[1]:=

X x = EventData[{10, 7, 32, 23, 22, 6, 16, 34, 32, 25, 11, 20, 19, 6, 17, 35, 6, 13, 9, 6, 10}, {0, 0, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 0, 0, 1, 1, 1}];

Фиттинг распределения WeibullDistribution по цензурированным данным.

In[2]:=

X dist = EstimatedDistribution[x, WeibullDistribution[\[Alpha], \[Beta]]]

Out[2]=

Создание непараметричной модели выживаемости.

In[3]:=

X model = SurvivalModelFit[x]

Out[3]=