|
Текст подпрограммы и версий ( Фортран ) sf58r.zip |
Тексты тестовых примеров ( Фортран ) tsf58r.zip |
|
Текст подпрограммы и версий ( Си ) sf58r_c.zip |
Тексты тестовых примеров ( Си ) tsf58r_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) sf58r_p.zip |
Тексты тестовых примеров ( Паскаль ) tsf58r_p.zip |
Вычисление предельного распределения статистик Колмогорова - Смирнова.
SF58R вычисляет значения P1 (x) и P2 (x) по следующим формулам:
P1(x) = 0 , x ≤ 0
(1)
P1(x) = 1 - exp( -2x2) , x > 0
P2(x) = 0 , x ≤ 0
(2) ∞
P2(x) = 1 + 2 ∑ (- 1) k exp(- k2x2) , x > 0
k=1
SUBROUTINE SF58R (X, P1, P2)
Параметры
| X - | заданное значение аргумента x (тип: вещественный); |
| P1, P2 - | вещественные переменные, содержащие вычисленные значения функций по формулам (1) и (2) соответственно. |
Версии: нет
Вызываемые подпрограммы: нет
Замечания по использованию
| Для 0 ≤ x ≤ 0.2 P2 ≡ 0 ; для x ≥ 4.0 P1 = P2 = 1. |
X = 0.4
CALL SF58R (X, P1, P2)
Результаты:
P1 = 0.27385096292
P2 = 0.28076732217*10 - 2