|
Текст подпрограммы и версий sf42r_c.zip |
Тексты тестовых примеров tsf42r_c.zip |
Вычисление функции F - распределения вероятностей (распределение Снедекора) с целыми степенями свободы.
sf42r_c вычисляет вероятность того, что случайная величина подчиненная закону F - распределения вероятностей (распределению Снедекора) с целыми степенями n1 и n2, меньше или равна значению f.
M.Abramowitz, I.A.Stegun, Handbook of Mathematical Functions, New York, Dover Publications, INC., 1965.
real sf42r_c (real *f, integer *n1, integer *n2, integer *ierr)
Параметры
| f - | заданное значение аргумента f (тип: вещественный); |
| n1, n2 - | заданные значения степеней свободы n1 и n2 (тип: целый); |
| ierr - | целая переменная, служащая для сообщения об ошибках, обнаруженных в ходе работы функции; при этом: |
| ierr=65 - | когда одна или обе степени свободы меньше 1 или их сумма больше 2*104; значение функции полагается равным 3.4e38; |
| ierr=66 - | когда заданный предел интегрирования меньше 0; значение функции полагается равным 3.4e38. |
Версии: нет
Вызываемые подпрограммы
| sf35r_c - | вычисление дополнительной функции ошибок (дополнительного интеграла вероятностей) erfc x. |
| utsf12_c - | подпрограмма выдачи диагностических сообщений при работе функции sf42r_c. |
Замечания по использованию: нет
int main(void)
{
/* Local variables */
extern float sf42r_c(float *, int *, int *, int *);
static int ierr;
static float f, y;
static int n1, n2;
f = .44444444444444442f;
n1 = 12;
n2 = 8;
y = (float)sf42r_c(&f, &n1, &n2, &ierr);
printf("\n %16.7e %5i \n",y,ierr);
return 0;
} /* main */
Результаты:
y = 0.09935257600
ierr = 0