generar numero de 9 cifras aleatorio que nunca se repita

[[fer21unmsm]]

Empezado por coletaun

Hola a todos.

Necesito generar un codigo de cliente, de 9 cifras, pero que aparte de ser alatorio, pero nunca correlativos, nunca genere el mismo, es decir que tenga en cuenta alguna variable, como la fecha, no se.

Necesitaria generar gran cantidad de numeros. Luego si paro el proceso y sigo generando, que nunca se repitan con los ya generados.

gracias de antemano.

Hola Coletaun, creo que eso es un tema de modelos y simulacion que me enseñaron en la universidad, lo que buscas es un modelo con una semilla y otros parametros que no me acuerdo que logren generar numeros aleatoreos que no degeneren, bueno para esto existen los metodos de los cuadrado medios (que no es recomendable porque degeneran rapidamente), pero puedes usar el congruencial mixto multiplicativo (si es que sabes escoger los parámetros correctos).

Se dice que un valor (semilla y algunos parametros) degeneran rápidamente, cuando los valores ingresados hacen que despues de un ciclo corto de #s aleatoreos se vuelvan a repetir de nuevo la secuencia, por ejemplo:

6,9,11,343,23,6,9,11...

te das cuenta por ejemplo si tuvieras esta seria con los parametros que ingresaras y te sale esta serie, se puede observar que se repite rapidamente, por lo tanto se degenera rapidamente.

Esto siempre pasa si usas el metodo de los cuadrados medios.
Pero si usas los valores correctos con el congruencial mixto multiplicativo no pasaria esto.

Por si acaso estos números no deben llamarse aleatoreos (ya que eso lo logras con tecnicas realmente al azar como el metodo de montecarlo, o utilizando la tabla de ibm utilizada para obtener numeros aleatoreos reales, ya que los números que te botan los metodos mencionados arriba se denomina pseudoaleatoreos, pero para los programas o sistemas se utilizan estos numeros pseudoaleatoreos

Si deseas saber sobre este tema de generación de números aleatoreos entra a la pagina de mi universidad:

www.sistemas.unmsm.edu.pe

en el lado derecho hay un ftp -> ciclo 2006-II ->Modelos y Simulacion y finalmente te bajas el archivo "Clase07NumAlea.ppt" que explica ese tema, si quieres explayarte mas buscas en google.

Espero te sirva

Saludos cordiales

[Robert01]

En la página del Dr Alan Miller pueden encontrar info sobre números aleatorios, en fortran, pero se puede traducir a pascal o hacer una dll.
Allí también hay links a varios sitios interesantes.

saludos

[[Delphius]]

Empezado por fer21unmsm

Pero si usas los valores correctos con el congruencial mixto multiplicativo no pasaria esto.

fer21unmsm, de eso precisamente me refiero cuando le indico a coletaun sobre mis algoritmos que puede conseguir en el hilo 1 que mencioné.

Y ahora que me acuerdo... no debería modificar ninguna parte del código. Si emplea el algoritmo Mixer() que detallo a continuación:

Código Delphi [-]
function Mixer(Seed_X0, a, b, m, Series: int64; var List: TStringList): integer;
{************************************************
 Genera una serie de números aletorios siguiendo
 el método congruencial mixto.
 * Parámetros *
 Seed_X0: valor semilla ( Corresponde a X0)
 a: factor multiplicativo
 b: factor aditivo
 m: módulo
 Series: cantidad de números a generar
 List: array de strings con los resultados
 ************************************************}
 var Ant,Sig:int64;
     i:integer;
 begin
 // realizamos unas preventivas:
 result := Preventive2(Seed_X0,a,m,Series);
 if result <> PROCESS
    then exit;
 Ant := 0;
  // borramos el contenido de la lista
 List.Clear;
 for i:=0 to Series-1 do
   begin
     if i = 0
        then begin
             List.Add(Format(RS_RESULT,[i,Seed_X0]));
             Ant := Seed_X0;
             end
        else begin
             Sig := (((a * Ant) + b) mod m);
             // agregar a la lista
             List.Add(Format(RS_RESULT,[i,Sig]));
             Ant := Sig;
             end;
   end;
 result := GENERATE;
 end; {Mixer}

Siendo Preventive2:

Código Delphi [-]
function Preventive2(Seed_X0,a,m,Series:int64): integer;
{************************************************
 Esta función permite chequear algunos valores
 iniciales para:
 * Multiplicative
 * Mixer
 * Parámetros *
 Seed_X0: valor semilla (Corresponde a X0)
 a: factor multiplicativo
 m: módulo
 Series: cantidad de números a generar
 ************************************************}
 begin
 if Seed_X0 = 0
    then begin
         result := SEED_X0_ZERO;
         exit;
         end;
 if a = 0
    then begin
         result := A_ZERO;
         exit;
         end;
 if m = 0
    then begin
         result := M_ZERO;
         exit;
         end;
 if Series < 1
    then begin
         result := INCORRECT_SERIES;
         exit;
         end;
 result := PROCESS;
 end; {Preventive2}

Las declaraciones en mayúsculas como M_ZERO son constantes y no vienen al caso ponerlas... que ya es intituivo.

Con los parámetros indicados, conseguirá su propósito No es necesario alterarlo... en List quedarán registrados los valores que necesite.

De seguro que en el enlace que mencionas va a cosneguir información académica y la explicación del algoritmo. Junto con el axioma adecuado para elegir los valores.

Empezado por fer21unmsm

Por si acaso estos números no deben llamarse aleatoreos (ya que eso lo logras con tecnicas realmente al azar como el metodo de montecarlo, o utilizando la tabla de ibm utilizada para obtener numeros aleatoreos reales, ya que los números que te botan los metodos mencionados arriba se denomina pseudoaleatoreos, pero para los programas o sistemas se utilizan estos numeros pseudoaleatoreos

Si... es cierto... deberían llamarlos asi. Pero para simplificar las cosas... y evitar alguna confusión de parte de coletaun. Sería meyor decirles aleatorios. Y recuerda fer21unmsm, estos métodos están basados en la teoría de los grandes números... y hay tests adecuados para verifivar si pueden considerarse "aletorios". Yo hice mis pruebas a todos mis algoritmos, con diversos valores y la pasaron en un 100%.

Robert01, habría que ofreces en el enlace que detallas. Y no deberían descartarse...

A ver que dice coletaun de esto: si le sirve... o definitivamente lo hemos asustado con esto de los generadores multiplicativos... tests y teoria de los grandes números.

Saludos,

[coletaun]

Con toda esta información, me documentaré y vere la mejor solucción. Diré que lo creía algo mas trivial de lo que realmente es lo de la secuencia de números aleatorios y la no repetición de los mismos.

Muchas gracias a todos por su interes, de verdad. Voy a ponerme manos a la obra.