Документ взят из кэша поисковой машины. Адрес оригинального документа : http://www.srcc.msu.ru/num_anal/lib_na/cat/sf/sf81r.htm
Дата изменения: Mon Mar 14 11:07:51 2011
Дата индексирования: Mon Feb 4 02:21:32 2013
Кодировка: Windows-1251
БЧА НИВЦ МГУ. SF81R. Специальные функции математической статистики
Текст подпрограммы и версий ( Фортран )
sf81r.zip  		Тексты тестовых примеров ( Фортран )
tsf81r.zip 
Текст подпрограммы и версий ( Си )
sf81r_c.zip  		Тексты тестовых примеров ( Си )
tsf81r_c.zip 
Текст подпрограммы и версий ( Паскаль )
sf81r_p.zip 		Тексты тестовых примеров ( Паскаль )
tsf81r_p.zip

Подпрограмма:  SF81R

Назначение

Вычисление обратной функции распределения вероятностей Парето.

Математическое описание

Подпрограмма SF81R вычисляет значение  x, для которого вероятность того, что случайная величина, имеющая распределение Парето с параметрами  A,  x0, меньше или pавна  x, pавно заданному значению  P 

                         x
        P = A/x0  т (x0 / Z)A - 1 dZ  ,      x ? x0 > 0  ,   A > 0
                       x0

Справочник по специальным функциям. Под ред. M.Абрамовица, И.Стеган. M.: "Hаука", 1979.

Использование 

    SUBROUTINE  SF81R (P, A, X0, X, IERR) 
   Параметры
P - заданное значение аргумента обратной функции распределения (тип: вещественный);
A, X0 - заданные значения параметров распределения Парето (тип: вещественный);
X - вещественная переменная, содержащая вычисленное значение обратной функции распределения Парето;
IERR - целая переменная, служащая для сообщения об ошибках; при этом:
IERR=65 - когда  A ? 0 либо  x0 ? 0,
IERR=66 - когда  P < 0 либо  P > 1; в обоих случаях значение  X полагается равным  X0. 
   Версии:  нет 
   Вызываемые подпрограммы
UTSF16 - подпрограмма выдачи диагностических сообщений при работе подпрограммы SF80R. 
   Замечания по использованию:  нет

Пример использования 

         CALL  SF81R (0.75, 1.0, 1.0, X, IERR)

Результаты:    X  =  4.0 ,   IERR  =  0