最佳答案
这在周末困扰着我:使用数学(图像处理和其他功能)解决那些沃尔多在哪?[北美以外的沃利]难题的好方法是什么?
这是我到目前为止所拥有的,一个通过调光来降低视觉复杂性的函数一些非红色的颜色:
whereIsWaldo[url_] := Module[{waldo, waldo2, waldoMask},waldo = Import[url];waldo2 = Image[ImageData[waldo] /. {{r_, g_, b_} /;Not[r > .7 && g < .3 && b < .3] :> {0, 0,0}, {r_, g_, b_} /; (r > .7 && g < .3 && b < .3) :> {1, 1,1}}];waldoMask = Closing[waldo2, 4];ImageCompose[waldo, {waldoMask, .5}]]
还有一个URL的例子,其中这个“工作”:
whereIsWaldo["http://www.findwaldo.com/fankit/graphics/IntlManOfLiterature/Scenes/DepartmentStore.jpg"]
(瓦尔多在收银机旁):