Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.17;
Скачать: CL | DM;

Вниз

Фрактальный генератор случайных чисел   Найти похожие ветки 

 
NailMan ©   (2003-06-30 15:56) [0]

Очень нужен сабж. Желательно конечно на Delphi.

Очень приветствуются примеры(на мыло или сюда) и УРЛы.


 
mrcat ©   (2003-06-30 16:05) [1]

Что-то не просеку фишки: если фракталы строятся на основе ПСЧ, то какой смысл строить сабж-систему, т.к. в итоге всё равно получим разброс не лучше чем начальный? Или не прав?


 
NailMan ©   (2003-06-30 16:19) [2]

Ну вроде дожно быть послучайней.

Я сейчас юзаю так: Randseed для Random`a вытаскиваю не randomize-ом, а из счетчика процессорных тактов. если первый бит 1 -старшая 32-битная половинка счетчика, и если 0, то младшая.
Если второй бит =1, то инвертирую выводимый randseed.

Будет в таком случае стандартный рандом лучше(случайней) если перед каждым Random я буду нереиничивать randseed?

А чем лучше RandG из стандартной библиотеки Math.pas?


 
Jeer ©   (2003-06-30 16:25) [3]

В любом случае это псевдослучайная последовательность.
Качество ГСЧ можно оценивать по автокорреляционной функции процесса, а также по приближению к желаемому закону распределенияю.
Random - равномерное распределение
RanG - Гауссово.


 
NailMan ©   (2003-06-30 16:34) [4]

Качество ГСЧ можно оценивать по автокорреляционной функции процесса, а также по приближению к желаемому закону распределенияю.
А можно поподробней по этому делу?
Как это можно протестить?

ЗЫ: Генератор мне нужен для полной генерации звездных систем в Галактике.


 
Mike B. ©   (2003-06-30 17:24) [5]

> Генератор мне нужен для полной генерации звездных систем в Галактике.
Господи! Иже еси на небеси...


 
Jeer ©   (2003-06-30 17:31) [6]

Еж тудыть...
А я со своей автокорреляционной..
:)


 
Asteroid ©   (2003-07-01 04:55) [7]

Лучше инициализируй с одним постянным randseed-ом. Тогда Random будет выдавать одни и те же "случайные" числа с периодичностью, кажется, 2^32.



Страницы: 1 вся ветка

Текущий архив: 2003.07.17;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.022 c
4-55889
Comwad
2003-05-15 08:44
2003.07.17
Как создать программно ярлык на рабочем столе?


1-55610
bpv
2003-07-03 15:02
2003.07.17
MS Project и Дельфи


11-55484
Ал
2002-11-17 00:43
2003.07.17
Как переопределить функцию в KOL?


6-55690
Oleg_delphin
2003-05-12 14:55
2003.07.17
Отправка на FTP


1-55569
Mishenka
2003-06-30 21:33
2003.07.17
Как в MaskEdit обработать исключение EDBEditError???