Navidad. Pavo, villancicos, el discurso del Rey, polvorones, la Misa del Gallo, Papá Noel. Papá Noel va de rojo y blanco. Como el Atleti, la Coca Cola o Wally. Curiosamente este post trata sobre encontrar a Waly usando Mathematica. Así de fino hilvanamos en Genbeta Dev. donde no descansamos ni por Navidad, siempre trayéndote artículos interesantes y/o curiosos como es este caso.
En nuestra amada Stack Overflow alguien preguntaba si sería posible encontrar a Wally (Waldo en el idioma de Shakespeare) en una de sus míticas láminas utilizando el potencial de Mathematica, el popular programa de cálculo matemático y, a su vez, poderoso (muy poderoso) lenguaje de programación. La respuesta no tardó en llegar y era de carácter afirmativo:
waldo = Import["http://www.findwaldo.com/fankit/graphics/
IntlManOfLiterature/Scenes/DepartmentStore.jpg"];
red = Fold[ImageSubtract, #[[1]], Rest[#]] &@ColorSeparate[waldo];
corr = ImageCorrelate[red,
Image@Join[ConstantArray[1, {2, 4}], ConstantArray[0, {2, 4}]],
NormalizedSquaredEuclideanDistance];
pos = Dilation[ColorNegate[Binarize[corr, .12]], DiskMatrix[30]];
found = ImageMultiply[waldo, ImageAdd[ColorConvert[pos, "GrayLevel"], .5]]
Particularmente no me gustan nada las matemáticas no me gustan nada y el Mathematica fue una cruz durante mi paso por la carrera por lo que no pienso ni instalarlo de nuevo pero si tú, querido lector, lo tienes instalado, puedes probarlo y que, efectivamente, funciona.
Y ya que estamos, ¿alguien sabe cómo encontrar a Wally con otros lenguajes de programación? Pues ale, venga, que los comentarios están para algo.
Pd: para quien no sepa quién es Wally (cosa que dudamos, de todas formas), su entrada en la Wikipedia.
Vía | Stack Overflow
Imagen | Find Waldo
