Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Генератор случайных чисел 
:(
    Опции темы
kosta
Дата 19.3.2005, 18:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 86
Регистрация: 19.3.2005

Репутация: нет
Всего: нет
Помогите кто знает есть ли функция генерирования случайных чисел не по равномерному закону распределения, как ето делает обычный рендом, а по закону распределения Гаусса или же по нормальному закону распределения. Если нет стандартной функции то мож ктото сталкивался с такой проблемой, подскажите что делать плз.
PM MAIL   Вверх
Snowy
Дата 19.3.2005, 19:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484
У меня есть хрендцать штук генераторов чисел.
Но исходняки на работе.
Если до понедельника никто не запостит, то закину.
PM MAIL   Вверх
kosta
Дата 19.3.2005, 19:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 86
Регистрация: 19.3.2005

Репутация: нет
Всего: нет
буду безмерно благодарен
PM MAIL   Вверх
Vit
Дата 19.3.2005, 20:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207
Ты наверное удивишься но в Дельфи есть стандартная функция для генерации случайных чисел с распределением по Гауссу. Называется RandG, живёт в модуле Math


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
Петрович
Дата 19.3.2005, 23:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1000
Регистрация: 2.12.2003
Где: Москва

Репутация: 25
Всего: 55
to Vit: и правда удивил smile


--------------------
Все знать невозможно, но хочется
PM ICQ   Вверх
Alex103
  Дата 20.3.2005, 04:20 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 416
Регистрация: 5.1.2005
Где: Украина, г. Харьк ов

Репутация: нет
Всего: нет
Вот простенькая функция даже это не функция а просто сам не знаю что.
Код

var x:integer;
x:= Random(1000); //()Здесь ставиться любое число

В этом примере компьютер сгенерит число от 0 до 1000


--------------------
Мой адресс не дом и не улица, мой адресс WWW
PM MAIL WWW ICQ YIM   Вверх
Vit
Дата 20.3.2005, 04:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Vitaly Nevzorov
****


Профиль
Группа: Экс. модератор
Сообщений: 10964
Регистрация: 25.3.2002
Где: Chicago

Репутация: 48
Всего: 207
Цитата(Alex103 @ 19.3.2005, 19:20)
Вот простенькая функция даже это не функция а просто сам не знаю что.



Не не туда, эта функция даёт линейное распределение, а человек спрашивает о нормальном, что совсем разные вещи... smile


--------------------
With the best wishes, Vit
I have done so much with so little for so long that I am now qualified to do anything with nothing
Самый большой Delphi FAQ на русском языке здесь: www.drkb.ru
PM MAIL WWW ICQ   Вверх
Alex103
Дата 20.3.2005, 04:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 416
Регистрация: 5.1.2005
Где: Украина, г. Харьк ов

Репутация: нет
Всего: нет
Цитата(Vit @ 20.3.2005, 04:26)
Цитата(Alex103 @ 19.3.2005, 19:20)
Вот простенькая функция даже это не функция а просто сам не знаю что.



Не не туда, эта функция даёт линейное распределение, а человек спрашивает о нормальном, что совсем разные вещи... smile

Извените я не знал!!! Теперь буду знать. smile


--------------------
Мой адресс не дом и не улица, мой адресс WWW
PM MAIL WWW ICQ YIM   Вверх
Snowy
Дата 21.3.2005, 09:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484
Вот, как обещал, библиотека генераторов. В комплекте:

Normal (Gaussian) Random_Normal
Gamma Random_Gamma
Chi-squared Random_ChiSq
Exponential Random_Exponential
Weibull Random_Weibull
Beta Random_Beta
t Random_T
Multivariate normal Random_MVNorm
Generalized inverse Gaussian Random_Inv_Gauss
Poisson Random_Poisson
Binomial Random_Binomial1 *
Random_Binomial2 *
Negative binomial Random_neg_Binomial
von Mises Random_von_Mises
Cauchy Random_Cauchy

Присоединённый файл ( Кол-во скачиваний: 143 )
Присоединённый файл  amrandom.zip
PM MAIL   Вверх
VTK
Дата 4.10.2006, 13:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 46
Регистрация: 4.10.2006

Репутация: нет
Всего: нет
Можно хоть пару слов о том, как этим пользоваться?
PM MAIL ICQ   Вверх
Snowy
Дата 4.10.2006, 14:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484
Там же пример в комплекте

Добавлено @ 14:50 
А какие трудности?
Там в модуле набор функций.
Перед каждой функцией описание.
Выбирай любую и используй.
Вот простой пример:
Код

  i := Trunc(Random_Cauchy * 100); // возвращает случайное число от 0 до 99
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.
 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0805 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.