генератор псевдослучайных чисел - распределение

[elsin]

Господа, подскажите, пожалуйста, если я с помощью random в цикле, перед циклом стоит randomize, генерирую последовательность псевдослучайных натуральных чисел, то какое распределение я получу, равномерное или нет?

[frodo]

Сообщение от elsin

Господа, подскажите, пожалуйста, если я с помощью random в цикле, перед циклом стоит randomize, генерирую последовательность псевдослучайных натуральных чисел, то какое распределение я получу, равномерное или нет?

маленько непонятно, как понять равномерное??? у тя просто будет генерироваться случайные в прямом смысле случайны числа из диапазона!!!
P.S. кстати код там маленький можеш сам попробывать и посмотреть результат!

[elsin]

Равномерное - это из теории вероятностей, т.е. вероятность выпадения того или иного числа равновероятна.
P.S.: Если я правильно помню из тер.вера

[elsin]

Допустим random действительно генерит дискретную последовательность по равномерному закону распределения, тогда у меня возникает другой вопрос: Как из этого равномерного распределения сделать другое распределение?

Или как в Delphi сгенерить дискретную последовательность с не стандартным распределением(не стандартную имею в виду, что даже в MATLAB таких распределений не делается автоматом).

[B_N]

Сообщение от elsin

Или как в Delphi сгенерить дискретную последовательность с не стандартным распределением(не стандартную имею в виду, что даже в MATLAB таких распределений не делается автоматом).

Ну скажем, грубо говоря, умножать то, что вернул random на закон распределения.
------------------------
Ой, в смысле не умножать, а отправлять в ЗР аргументом.

[5naip]

random работает по нормальному распределению.

[elsin]

Сообщение от B_N

Ой, в смысле не умножать, а отправлять в ЗР аргументом.

А этот как не подскажете? С учетом дискретности последовательности.

Для непрерывных последовательностей: "умножается" на функцию обратную от требуемого закона распределения, но этот метод для дискретных не работает

[_Dmitry]

random - равномерное распределение.
В модуле Math есть функция RandG - генерирует нормально псевдораспределенную последовательность чисел с заданным средним значением Mean и стандартным отклонением StdDev.

function RandG(Mean, StdDev: Extended): Extended;
{ Marsaglia-Bray algorithm }
var
  U1, S2: Extended;
begin
  repeat
    U1 := 2*Random - 1;
    S2 := Sqr(U1) + Sqr(2*Random-1);
  until S2 < 1;
  Result := Sqrt(-2*Ln(S2)/S2) * U1 * StdDev + Mean;
end;

Посмотрите еще здесь http://www.srcc.msu.su/num_anal/lib_na/cat/cat14.htm правда алгоритмы на Фортране и С.

[elsin]

Спасибо, попробую, только вот до дома бы доехать по пробкам

Сообщение от _Dmitry

Посмотрите еще здесь http://www.srcc.msu.su/num_anal/lib_na/cat/cat14.htm правда алгоритмы на Фортране и С.

К сожалению там рассмотрены алгоритмы для непрерывных последовательностей, а не для дискретных.

[B_N]

5naip, если бы random работал по нормальному распределению, то в центре заполняемых рэндомом картинок было бы характерное пятно, чего не наблюдается.

elsin, большинсво существующих генераторов возвращают либо целое число в указанном диапазоне, либо вещественное в промежутке 0..1. Даже ряд из 65536 чисел, если его привести к промежутку 0..1 (в вещественном виде), вполне можно для большинства применений считать непрерывным.