|
Текст подпрограммы и версий sf46r_c.zip |
Тексты тестовых примеров tsf46r_c.zip |
Вычисление функции χ2 - распределения вероятности с целыми степенями свободы.
sf46r_c вычисляет вероятность того, что случайная величина, подчиненная χ2 - распределению с целым параметром N (N ≥ 1), больше x (x ≥ 0).
I.D.Hill, M.C.Pike, Algorithm 299 - Chi - squared Integral (S15), CACM, 10 (4), 1967.
real sf46r_c (real *x, integer *n, integer *ierr)
Параметры
| x - | заданное значение аргумента x (тип: вещественный); |
| n - |
заданное значение степени свободы χ2 - распределения (тип: целый); |
| ierr - | целая переменная, служащая для сообщения об ошибках, обнаруженных в ходе работы функции; при этом: |
| ierr=65 - | когда верхний предел интегрирования меньше 0; значение функции положено равным 3.4e38; |
| ierr=66 - | когда заданная степень свободы меньше 1; значение функции положено равным 3.4e38. |
Версии: нет
Вызываемые подпрограммы
| sf35r_c - | вычисление дополнительной функции ошибок (дополнительного интеграла вероятности) erfc x. |
| utsf12_c - | подпрограмма выдачи диагностических сообщений в ходе работы функции sf46r_c. |
Замечания по использованию: нет
int main(void)
{
/* Local variables */
static int ierr;
extern float sf46r_c(float *, int *, int *);
static int n;
static float x, y;
x = 9.2205f;
n = 2;
y = (float)sf46r_c(&x, &n, &ierr);
printf("\n %16.7e %5i \n",y,ierr);
return 0;
} /* main */
Результаты:
y = 0.00994933066
ierr = 0