Generador de números aleatorios

[elcigarra]

Podrías ir guardando los numeros emitidos en algún array generarlos en un bucle tipo While que solo salgan los que no se repitan... El tema es que estos que tu querés hacer son MENOS aleatorios todavía que los generados con el Random pelado. Corrijo a mi amigo crandel: No siempre tienen distribución normal, por lo menos en mi delphi 7 (si mal no recuerdo) hay funciones con algoritmos estadísticos para números aleatorios (o no tan aleatorios) con distribuciones de probabilidad tipo Poisson, "t", rectangulares y otras que a nosotros los pseudo científicos nos sirven de mucho.

[gontxalo]

Y no se puede cambiar la semilla para que sea por ejemplo los minutos o segundos .... de cuando se ejecute la aplicación?
Gracias.

[[maeyanes]]

Eso es precisamente lo que hace el procedimiento Randomize

De la ayuda de delphi:

Description

Randomize initializes the built-in random number generator with a random value (obtained from the system clock). The random number generator should be initialized by making a call to Randomize, or by assigning a value to RandSeed.

[[Crandel]]

Empezado por elcigarra

No siempre tienen distribución normal, por lo menos en mi delphi 7 (si mal no recuerdo) hay funciones con algoritmos estadísticos para números aleatorios (o no tan aleatorios) con distribuciones de probabilidad tipo Poisson, "t", rectangulares y otras que a nosotros los pseudo científicos nos sirven de mucho.

podrias comentar como cambiar la distribución de la función random, porque la verdad a mi me resultaria bastante util.

Gracias

[[Delphius]]

personalmente para lograr nros "mas aletorios" realizo lo siguiente:

Código Delphi [-]
Randomize;
X = Random(Random(Dimension))+1;

Siendo Dimensión algún valor demasiado grande.
Espero que pueda serte útil.
Personalmente, esto de cambiar la distribución no se si se pueda... y me enteresa ya que tengo un simulador de tragamonedas que necesita ser más "real"

[[Crandel]]

Hola Delphius, tu función si modifica la distribución, si no me euquivoco de primera vista parece obtener una distribución exponencial decreciente, lo cual te puede general una gran predominancia de los numeros inferiores.

Esto es facilmente comprobable, simplemente podrias graficar un histograma con 1000 números generados.

Creo que nos fuimos totalmente de la pregunta de gontxalo , pero se puso mas interesante

Despues de escribir el mensaje anterior me acorde que hice un programa para la facultad donde genrabamos valores aleatorios con diferentes distribuciones. Voy a ver si lo encuentro (fue hace bastante) y lo escribo por aca.

[[Crandel]]

Aca encontre la forma en que generaba los número con diferentes distribuciones:

Uniforme

Código Delphi [-]
   dato := dstandard*Sqrt(12)*(random - 0.5) + vmedio;

Normal

Código Delphi [-]
   dato := dstandard*Sqrt(-2*ln(random))*cos(2*pi*random) + vmedio;

Exponencial

Código Delphi [-]
   dato := dstandard*ln(random)+(vmedio-dstandard);

donde dstandard es la distribución estandar y vmedio es el valor medio requerido.

Lo puede tomar al que le sirva.