Mosaics

Inspired by [url=https://www.geogebra.org/u/jotab]Jean-Baptiste Etienne[/url][br][br]from https://www.geogebra.org/m/bru68suz
Script
w = Slider(0, 1, 0.01, 1, 150, false, true, false, false)[br]h = Slider(0, 1, 0.01, 1, 150, false, true, false, false)[br][br]n = Slider(1, 10, 1, 1, 150, false, true, false, false)[br]Ln = 2...n[br][br]PointsN = Zip(Zip( (i + RandomUniform(0, w), j + RandomUniform(0, h) ), i, Ln ), j, Ln )[br][br]PolyN = Zip( Zip( Polygon( Element(PointsN, i, j), Element(PointsN, i, j+1), Element(PointsN, i+1, j+1), Element(PointsN, i+1, j) ), i, Ln ), j, Ln )[br][br]CN = Zip( Zip( Centroid( Element(PolyN, i, j) ), i, Ln ), j, Ln )[br][br]s = Slider(1, 8, 1, 1, 150, false, true, false, false)[br]Ls = 1...(s-1)[br][br]Mosaic = Zip( Zip( Zip(Dilate(Element(PolyN, i, j), k/s, Element(CN, j, i)), k, Ls), i, Ln), j, Ln )[br]

Información: Mosaics