private void btnProductosMedios_Click(object sender, EventArgs e)
{
//PRODUCTOS MEDIOS ##########################################################################
double semilla, cantidad, semilla2, semilla_total, x;
semilla = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("Ingrese la semilla:", "Semila", "0", 100, 100));
semilla2 = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("Ingrese la semilla2:", "Semila", "0", 100, 100));
x = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("Ingrese el valor de X:", "X", "0", 100, 100));
cantidad = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("¿Cuantos numeros desea generar?:", "Numeros a generar", "0", 100, 100));
//semilla_total = 0;
for (int i = 0; i < cantidad; i++)
{
semilla_total = semilla * semilla2;
string Nsemilla_total;
Nsemilla_total = Convert.ToString(semilla_total);
String D4;
D4 = Nsemilla_total.Substring(2, 4);
semilla2 = Convert.ToInt32(D4);
listNumGene.Items.Add(semilla_total);
listNumCentrales.Items.Add("0." + semilla2);
}
//Factorial de X
double factx = 1;
for (int i = 1; i <= x; i++)
{
factx = factx * i;
}
txtFactorial.Text = factx.ToString();
//------------------------------------------------------------------------------------
double promedio = 0;
double suma = 0;
foreach (object item in listNumCentrales.Items) //SUMA TODOS LOS NUMEROS ALEATORIOS GENERADOS
{
suma += Convert.ToDouble(item);
}
promedio = suma / cantidad;
double euler = 2.7182;
double valorx = 0;
valorx = (((Math.Pow(euler, -promedio) * (Math.Pow(promedio, x)))) / (factx));
txtX.Text = valorx.ToString();
}
private void btnCuadradosMedios_Click(object sender, EventArgs e)
{
//PRODUCTOS MEDIOS ##########################################################################
double semilla, cantidad, semilla2, semilla_total, valcom;
semilla = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("Ingrese la semilla:", "Semila", "0", 100, 100));
semilla2 = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("Ingrese la semilla2:", "Semila", "0", 100, 100));
valcom = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("¿Cuantas variables aleatorias componentes desea generar?:", "Variables aleatorias componentes", "0", 100, 100));
cantidad = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("¿Cuantos numeros desea generar?:", "Numeros a generar", "0", 100, 100));
//semilla_total = 0;
double iteraciones = valcom * 2;
double num = 1;
for (int i = 0; i < iteraciones; i++)
{
semilla_total = semilla * semilla2;
string Nsemilla_total;
Nsemilla_total = Convert.ToString(semilla_total);
String D4;
D4 = Nsemilla_total.Substring(2, 4);
semilla2 = Convert.ToInt32(D4);
listNumGene.Items.Add(semilla_total);
listNumCentrales.Items.Add("0." + semilla2);
num++;
}
//------------------------------------------------------------------------------
double suma = 0;
foreach (object item in listNumCentrales.Items) //SUMA TODOS LOS NUMEROS ALEATORIOS GENERADOS
{
suma += Convert.ToDouble(item);
}
txtX.Text = suma.ToString();
//-----------------------------------------------------------------------------
}
private void button1_Click(object sender, EventArgs e)
{
double semilla, cantidad;
semilla = int.Parse(textBox1.Text);
semilla2 = int.Parse(textBox2.Text);
cantidad = int.Parse(textBox3.Text);
double semilla_total = 0;
for (int i = 0; i < cantidad; i++)
{
semilla_total = semilla * semilla2;
string Nsemilla_total;
Nsemilla_total = Convert.ToString(semilla_total);
String D4;
D4 = Nsemilla_total.Substring(2, 4);
semilla2 = Convert.ToInt32(D4);
listBox1.Items.Add(semilla_total);
listBox2.Items.Add("0." + semilla2);
}
}
private void button2_Click(object sender, EventArgs e)
{
//PRODUCTOS MEDIOS ##########################################################################
double semilla, cantidad, semilla2, semilla_total;
semilla = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("Ingrese la semilla:", "Semila", "0", 100, 100));
semilla2 = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("Ingrese la semilla2:", "Semila", "0", 100, 100));
cantidad = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("¿Cuantos numeros desea generar?:", "Numeros a generar", "0", 100, 100));
//semilla_total = 0;
for (int i = 0; i < cantidad; i++)
{
semilla_total = semilla * semilla2;
string Nsemilla_total;
Nsemilla_total = Convert.ToString(semilla_total);
String D4;
D4 = Nsemilla_total.Substring(2, 4);
semilla2 = Convert.ToInt32(D4);
listMostrarCompleto.Items.Add(semilla_total);
listMostrarCentrales.Items.Add("0." + semilla2);
}
//------------------------------------------------------------------------------
double promedio = 0;
double suma = 0;
foreach (object item in listMostrarCentrales.Items) //SUMA TODOS LOS NUMEROS ALEATORIOS GENERADOS
{
suma += Convert.ToDouble(item);
}
promedio = suma / cantidad;
//-----------------------------------------------------------------------------
double nuevo = 0;
double resta = 0;
foreach (object item in listMostrarCentrales.Items) //SUMA TODOS LOS NUMEROS ALEATORIOS GENERADOS - PROMEDIO
{
resta += Convert.ToDouble(item); //Y ELEVA AL CUADRAO
nuevo = Math.Pow((resta - promedio), 2);
}
double nuevaSumatoria = nuevo;
//--------------------------------------------------------------------------------
txtPromedio.Text = (promedio.ToString()); //IMPRIME EL PROMEDIO
double ValorEsperado = 0.05; //ES EL VALOR ESPERADO
double Alfa = ((1 - (ValorEsperado / 2))); //ELEMENTO NESESARIO PARA LIMITES
txtAlfa.Text = Alfa.ToString();
double Z = 0.95996398;
txtZ.Text = (Z.ToString());
double LimSuperior = ((ValorEsperado - Z) * (1 / Math.Sqrt(12 * cantidad)));
txtLimSuperior.Text = (LimSuperior.ToString());
double LimInferior = ((ValorEsperado + Z) * (1 / Math.Sqrt(12 * cantidad)));
txtLimInferior.Text = (LimInferior.ToString());
//--------------------------------------------------------------------------------------
//FORMULA DE LA VARIANZA
double varianza = (nuevo / cantidad - 1);
txtVarianza.Text = (varianza.ToString());
}
private void btnProductosMedios_Click(object sender, EventArgs e)
{
//PRODUCTOS MEDIOS #####################################################################
double semilla, cantidad, semilla2, semilla_total, numintervalos;
numintervalos = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("¿Cuantos intervalos desea?:", "Dados", "0", 100, 100));
semilla = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("Ingrese la semilla:", "Semila", "0", 100, 100));
semilla2 = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("Ingrese la semilla2:", "Semila", "0", 100, 100));
cantidad = double.Parse(Microsoft.VisualBasic.Interaction.InputBox("¿Cuantos numeros desea generar?:", "Numeros a generar", "0", 100, 100));
double valorintervalo = (1 / numintervalos);
for (int i = 0; i < cantidad; i++)
{
semilla_total = semilla * semilla2;
string Nsemilla_total;
Nsemilla_total = Convert.ToString(semilla_total);
String D4;
D4 = Nsemilla_total.Substring(2, 4);
semilla2 = Convert.ToInt32(D4);
listNumGene.Items.Add("0." + semilla2);
}
foreach (object item in listNumGene.Items)
{
//Asignacion de valores a intervalos
if (Convert.ToDouble(item) < valorintervalo)
{
listInter1.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 2) && Convert.ToDouble(item) > valorintervalo)
{
listInter2.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 3) && Convert.ToDouble(item) > (valorintervalo * 2))
{
listInter3.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 4) && Convert.ToDouble(item) > (valorintervalo * 3))
{
listInter4.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 5) && Convert.ToDouble(item) > (valorintervalo * 4))
{
listInter5.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 6) && Convert.ToDouble(item) > (valorintervalo * 5))
{
listInter6.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 7) && Convert.ToDouble(item) > (valorintervalo * 6))
{
listInter7.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 8) && Convert.ToDouble(item) > (valorintervalo * 7))
{
listInter8.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 9) && Convert.ToDouble(item) > (valorintervalo * 8))
{
listInter9.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 10) && Convert.ToDouble(item) > (valorintervalo * 9))
{
listInter10.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 11) && Convert.ToDouble(item) > (valorintervalo * 10))
{
listInter11.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 12) && Convert.ToDouble(item) > (valorintervalo * 13))
{
listInter12.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 14) && Convert.ToDouble(item) > (valorintervalo * 15))
{
listInter13.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 15) && Convert.ToDouble(item) > (valorintervalo * 16))
{
listInter14.Items.Add(Convert.ToDouble(item));
}
else if (Convert.ToDouble(item) < (valorintervalo * 16) && Convert.ToDouble(item) > (valorintervalo * 17))
{
listInter15.Items.Add(Convert.ToDouble(item));
}
}
}
