Текст подпрограммы и версий
bk01r_c.zip , bk01d_c.zip
Тексты тестовых примеров
tbk01r_c.zip , tbk01d_c.zip

Подпрограмма:  bk01r_c

Назначение

Проверка совпадения средних значений двух генеральных совокупностей, имеющих одинаковую дисперсию.

Математическое описание

Подпрограмма вычисляет по выбopkaм X1 и X2 значение статистики Стьюдента и по нему оценивает уровень значимости критерия ALFA. Чем меньше уровень значимости ALFA, тем больше оснований утверждать, что выборки X1 и X2 сделаны из генеральных совокупностей, имеющих разные средние значения.

Использование

    int bk01r_c (real *x1, integer *n1, real *x2,
            integer *n2, real *alfa)

Параметры

x1 - вещественный вектор длины n1, содержащий выборку из первой генеральной совокупности;
n1 - длина вектора X1 (тип: целый);
x2 - вещественный вектор длины n2, содержащий выборку из второй генеральной совокупности;
n2 - длина вектора X2 (тип: целый);
alfa - вещественная переменная, содержащая вычисленный уровень значимости.

Версии

bk01d_c - проверка совпадения средних значений двух имеющих одинаковую дисперсию генеральных совокупностей по выборкам, заданным с удвоенной точностью. Параметры x1, x2, alfa должны иметь тип double.

Вызываемые подпрограммы

sf36r_c - вычисление бета - функции распределения вероятностей; используется в подпрограмме bk01r_c.
sf36d_c - вычисление бета - функции распределения вероятностей с удвоенной точностью; используется в подпрограмме bk01d_c.

Замечания по использованию: нет

Пример использования

int main(void)
{
    /* Initialized data */
    static float x1[3] = { 1.f,2.f,3.f };
    static float x2[4] = { 4.f,5.f,6.f,7.f };

    /* Local variables */
    static float alfa;
    extern int bk01r_c(float *, int *, float *, int *, float *);
    static int n1, n2;

    n1 = 3;
    n2 = 4;
    bk01r_c(x1, &n1, x2, &n2, &alfa);

    printf("\n tbk01r:  alfa= %16.7e \n", alfa);
    return ;
} /* main */


Результат:    alfa  =  0.01172481