|
Текст подпрограммы и версий sf54r_c.zip |
Тексты тестовых примеров tsf54r_c.zip |
Вычисление функции нецентрального t - распределения вероятностей Стьюдента.
sf54r_c вычисляет вероятность того, что случайная величина, подчиненная закону нецентрального t - распределения вероятностей Стьюдента с параметром D и степенью свободы IDF (IDF > 0), меньше или pавна x.
M.Abramowitz, I.A.Stegun, Handbook of Mathematical Functions, Dover Publications, Inc., New York, 1965.
real sf54r_c (real *x, real *d, integer *idf, integer *ierr)
Параметры
| x - | заданное значение аргумента x (тип: вещественный); |
| d - | заданное значение параметра нецентрального t - распределения Стьюдента (тип: вещественный); |
| idf - | заданное значение степени свободы нецентрального t - распределения Стьюдента (тип: целый); |
| ierr - | целая переменная, служащая для сообщения об ошибках, обнаруженных в ходе работы функции; при этом: |
| ierr=65 - | когда заданная степень свободы нецентрального t - распределения Стьюдента меньше или pавна 0; значение функции полагается равным 3.4e38. |
Версии: нет
Вызываемые подпрограммы
| sf49r_c - | вычисление стандартизованной (нормированной) функции нормального распределения вероятностей; |
| sf35r_c - | вычисление дополнительной функции ошибок (дополнительного интеграла вероятности) erfc x; |
| utsf14_c - | подпрограмма выдачи диагностических сообщений в ходе работы функции sf54r_c. |
Замечания по использованию: нет
int main(void)
{
/* Local variables */
static int ierr;
extern float sf54r_c(float *, float *, int *, int *);
static float d__, p, x;
static int idf;
x = 2.f;
d__ = 1.f;
idf = 2;
p = (float)sf54r_c(&x, &d__, &idf, &ierr);
printf("\n %16.7e %16.7e %5i \n",x,d__,idf);
printf("\n %16.7e %5i \n",p,ierr);
return 0;
} /* main */
Результаты: p = 0.706662049503 , ierr = 0