| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
распределение Эрланга [D7, WinXP]
Corwin © (2005-10-25 13:25:00)нужно реализовать распределение Эрланга
в среде 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 - это матожидание
вот с реализацией этой функции и связью ее с предыдущей у меня возникли проблемы...
поможите?
Corwin (2005-10-25 21:16:00) [1]спасибо! вродебы оно!
MBo (2005-10-25 13:40:00) [2]Оно?
http://www.srcc.msu.su/num_anal/lib_na/cat/sf/sf86r.htm
| |
