|
Текст подпрограммы и версий ( Фортран ) sf70r.zip |
Тексты тестовых примеров ( Фортран ) tsf70r.zip |
|
Текст подпрограммы и версий ( Си ) sf70r_c.zip |
Тексты тестовых примеров ( Си ) tsf70r_c.zip |
|
Текст подпрограммы и версий ( Паскаль ) sf70r_p.zip |
Тексты тестовых примеров ( Паскаль ) tsf70r_p.zip |
Вычисление обратной функции показательного распределения вероятностей.
SF70R вычисляет значение x такое, что F (x, λ) = P, где F (x, λ) - функция показательного распределения вероятностей:
x
F (x, λ) = λ ∫ e - λz dz , λ > 0
0
Справочник по специальным функциям. Под ред. M.Абрамовица, И.Стеган. M.: "Hаука", 1979.
SUBROUTINE SF70R (P, RL, X, IERR)
Параметры
| P - | заданное значение аргумента (тип: вещественный); |
| RL - | параметр λ обратной функции показательного распределения (тип: вещественный); |
| X - | вещественная переменная, содержащая вычисленное значение функции; |
| IERR - | целая переменная, служащая для сообщения об ошибках; при этом: |
|
IERR = 65, когда λ ≤ 0; IERR = 66, когда P < 0, либо P > 1; значение x в обоих случаях полагается равным нулю. |
Версии: нет
Вызываемые подпрограммы
| UTSF16 - | подпрограмма выдачи диагностических сообщений при работе подпрограммы SF70R. |
Замечания по использованию: нет
CALL SF70R (0.77686983985, 1.0, X, IERR) Результаты: P = 1.49999999996 , IERR = 0