Эксперименты с монетой. Откроем файл Moneysum. sav

Откроем файл Moneysum. sav. Построим 5 последовательностей среднеарифметических:

Transform - Compute - Target Variable: f1, Numeric Expression: mcs1 / n -OK,

затем аналогично f2 по mcs 2, и т.д. до f5.

Образуем еще одну переменную f0 со значением предельного значения 0.5.

Посмотрим графически зависимость f_n от n:

Graphs - Line - Multiple, Values of individual cases - Define - перенесем f0 и f1 в поле Lines Represent, Case number - OK.

Наблюдаем график. Убеждаемся, что частота выпадения “герба” f_n с ростом n приближается к вероятности выпадения “герба” p = 0.5. Посмотрим f2 ¸ f5. Сформируем график со всеми кривыми. Графики распечатаем или сохраним.

Эксперименты со случайными числами, распределенными равномерно на отрезке [0, 1].

Откроем файл Unifsum. sav.

Далее наши действия аналогичны предыдущему. Переменная f1 (последовательность среднеарифметических) определяется по Numeric Expression:

xcs1 / n

Аналогично f2 по xcs 2, и т. д. до f5. Графики показывают, что последовательность среднеарифметических приближается к математическому ожиданию.

перед выполнением этого пункта было бы интересно посмотреть графически исходные белошумовые последовательности х₁,..., x_N, отдельно каждую. Графики сохраним или распечатаем.