распределение Эрланга

← →
Corwin (2005-10-25 13:25) [0]

нужно реализовать распределение Эрланга
в среде Delphi с построением гистограммы, гистограмму я сам могу реализовать, делал для экспотенциального распределения, а с реализацией Эрланга возникли проблемы, на сколько я понял из прочтеных книг, он должен содержать два генератора.
Первый реализовал с помощью функции
function TForm1.Slych():real;
var
i:integer;
r:real;
a:integer;
begin
a:=4*k+1;
z:=(a*z+b)mod c;
r:=z/c;
result:=-m*ln(1-r);
end;

z-базовое число, r-i-ое псевдо случайное число - это я генерирую равномероное распределение,
а дальше надо реализовать
распределение Эрланга по формуле

k
x=- M*ln(П ri),
i=1
к количесто повторений числа r, а M - это матожидание

вот с реализацией этой функции и связью ее с предыдущей у меня возникли проблемы...
поможите?

← →
MBo © (2005-10-25 13:40) [1]

Оно?
http://www.srcc.msu.su/num_anal/lib_na/cat/sf/sf86r.htm

← →
Corwin (2005-10-25 21:16) [2]

спасибо! вродебы оно!

распределение Эрланга Найти похожие ветки