REGLAS, Herramientas, Tutoriales => Herramientas => Mensaje iniciado por: albañil en 05 Junio, 2016, 18:22



Título: Busco calculadora de nº binarios aleatorios
Publicado por: albañil en 05 Junio, 2016, 18:22
A ver si alguien sabe si existe esto que propongo;

Quiero saber si existe alguna calculadora o de excel que haga lo siguiente;

1/ tengo 2 variables (0 y 1)

2/ hay un % de que salga 0 y 1 que  pueda programar, (por ejemplo quiero que me salga el 65%)

3/ quiero hacer un nº de intentos programable (por ejemplo 500 intentos)

4/ Después de introducir las variables  %, y el nº de intentos que me salga una cifra totalmente aleatoria del nº de intentos con el % puesto (ejemplo 010111111000101110000,,,,)

A ver si tengo suerte, un saludo   ;)


Título: Re: Busco calculadora de nº binarios aleatorios
Publicado por: Luis Fuentes en 09 Junio, 2016, 05:42
Hola

 Bienvenido al foro.

 Recuerda leer y seguir  las reglas (http://rinconmatematico.com/foros/index.php?topic=678.0) del mismo así como el tutorial del LaTeX (http://rinconmatematico.com/instructivolatex/formulas.htm) para escribir las fórmulas matemáticas correctamente.

A ver si alguien sabe si existe esto que propongo;

Quiero saber si existe alguna calculadora o de excel que haga lo siguiente;

1/ tengo 2 variables (0 y 1)

2/ hay un % de que salga 0 y 1 que  pueda programar, (por ejemplo quiero que me salga el 65%)

3/ quiero hacer un nº de intentos programable (por ejemplo 500 intentos)

4/ Después de introducir las variables  %, y el nº de intentos que me salga una cifra totalmente aleatoria del nº de intentos con el % puesto (ejemplo 010111111000101110000,,,,)

A ver si tengo suerte, un saludo   ;)

En el archivo adjunto tienes una posible implementación en EXCEL que utiliza la siguiente macro en VBA:

Código:
Function Genera(Valor As Integer, P As Double) As String
Dim numero As String
numero = ""
For i = 1 To Valor
    If Rnd() < P Then
        numero = numero & "1"
    Else
        numero = numero & "0"
    End If
Next i
Genera = numero
End Function

Saludos.