Simulación del lanzamiento de un dado (hoja de cálculo)

EJEMPLO SENCILLO: Lanzamiento de un dado no trucado usando la hoja de cálculo. CONSTRUCCIÓN:
  • Se abre la hoja de cálculo.
  • En la primera columna en el rango A2:A201 se rellenan los números 1, 2, ...200. Para ello se escribe 1 en la celda A2, 2 en la celda A3, se seleccionan ambas y se arrastra hacia abajo tirando con el ratón de la esquina inferior derecha del rango seleccionado (A2:A3).
  • En la celda B2 se escribe: =AleatorioEntre[1, 6]
  • Se copia la fórmula anterior seleccionando la celda B2 y arrastrando hacia abajo.
  • En el rango C3: H3 escribimos 1, 2, ...,6
  • Para el recuento escribimos en la celda C4 la fórmula: =CountIf[x ≟ C3, $B2:$B201] y copiamos en las correspondientes celdas de la derecha. El símbolo $ sirve para fijar la columna B y evitar que se convierta en C, D, etc. al pegar en las celdas adyacentes.
  • Creamos la siguiente lista (en la ventana de entrada de comandos): clases = Secuencia[0.5 + k, k, 0, 6]. Servirá para crear el histograma correspondiente.
  • Creamos la siguiente lista: recuento = {C4, D4, E4, F4, G4, H4} para tener almacenadas las frecuencias de cada resultado.
  • Almacenamos los resultados (los 200 resultados) en otra lista: resultadosBrutos = B2:B201
  • Dibujamos el histograma: Histograma[clases, resultadosBrutos, true, 0.1] (información sobre el comando Histograma: http://wiki.geogebra.org/es/Comando_Histograma)
  • Creamos un texto informativo para mostrar el recuento: TablaTexto[{Añade["Resultados: ", resultadosPosibles], Añade["Frecuencias absolutas: ", recuento]}, "c_|"]
  • A partir de este momento pulsando la tecla F9 se recalculan de nuevo todos los resultados.
  • Añadimos un botón con el script (Al Click) ActualizaConstrucción[]. Esto hace que al pulsarlo también se recalculen los resultados de la simulación.
ACTIVIDAD: Diseña un archivo similar y añade en el histograma la frecuencia absoluta de cada resultado (como texto y estableciendo la posición adecuada del texto, por ejemplo en la parte inferior de cada columna)
Carlos Fleitas, abril de 2014