Matemáticas en el arte
Rectángulos aleatorios
Paso a paso
Creamos dos deslizadores de tipo entero:
- Número de rectángulos: n, valor mínimo 1, valor máximo, 30. Incremento 1.
- Tamaño rectángulos: i, valor mínimo 1, valor máximo, 10. Incremento 1.
Creamos dos valores que nos ayudarán a tener centrado nuestra composición. Escribimos en la barra de entrada:
- der=9
- top=4
Creamos el primer vértice de nuestros rectángulos:
- l1=Secuencia((AleatorioEntre(-i, i), AleatorioEntre(-i, i)), k, 1, n)
Generamos el segundo vértice de nuestro rectángulo, apoyados en el primero:
- l2=Zip(k + (AleatorioEntre(1, der, true), 0), k, l1)
Generamos el tercer vértice:
- l3=Zip(k + (0, AleatorioEntre(1, top)), k, l1
Y el cuarto:
- l4=Zip((x(k), y(s)), k, l2, s, l3)
Ahora generamos los rectángulos aleatorios:
- l5=Zip(Polígono(k, s, t, r), k, l1, s, l2, t, l4, r, l3)
Ya solo queda decorar. Para colorear usaremos tres funciones que nos permitirán cambiar los colores de forma ágil:
- f(x) = x ℯ^x
- g(x) = ln(x)
- h(x) = sqrt(x)
Ahora asignamos a la lista l5, esos colores:
- Rojo: f(-n)
- Verde: h(n)
- Azul: g(n)
- Opacidad: 1 / 10 + n / (n² + 1)
Para trazar el cuadrado exterior podemos crear:
- A=Esquina(1,1)
- B=Esquina(1,2)
- C=Esquina(1,3)
- D=Esquina(1,4)
Ahora creamos los segmentos y el cuadrilátero por separado.
Obra publicada con Licencia Creative Commons Reconocimiento Compartir igual 4.0