 |  |  |
Les bandes chromostereopsis bleues et rouges en mouvement d’Akiyoshi Kitaoka
Les bandes chromostereopsis bleues et rouges en mouvement d’Akiyoshi Kitaoka
par Vitaliy Kaurov
Contexte
Contexte
Cette illusion spécifique a été conçue par Akiyoshi Kitaoka, un psychologue expérimental qui étudie les illusions visuelles et crée également des œuvres d’illusion :
De minuscules arcs-en-ciel dans les yeux trompent le cerveau et lui font voir en 3D. Le 🟥 ressort-il vers le haut et le 🟦 s’enfonce-t-il vers le bas ? Fermez 1 œil. Les points sont entièrement aléatoires, aucune conception particulière ici ne contient d’information pour que le cerveau interprète différemment le relief du rouge et du bleu. Cela explique pourquoi le chromostereopsis est une illusion d’optique.
Les rayons lumineux se courbent (se réfractent) différemment selon les couleurs, en traversant le cristallin de l’œil comme ils traversent les gouttelettes d’eau dans un arc-en-ciel. Ce qui fait apparaître les arcs-en-ciel colorés déclenche également cette illusion 3D dans notre cerveau. Les rayons bleus et rouges atteignent différents points sur la rétine de l’œil et trompent notre cerveau dans son interprétation de la profondeur spatiale. L’illusion est fondamentalement binoculaire, fermez un œil et elle s’affaiblit. Vous pouvez tester l’intensité de l’illusion en fermant et en ouvrant lentement un œil.
Les ocelles rouges et bleues contrastées sur les ailes des papillons étaient peut-être des caractéristiques évolutives efficaces pour dérouter et effrayer les prédateurs. Les mentions connues de cet effet remontent jusqu’à Goethe. Les artistes l’ont utilisé assez tôt (déjà à la Renaissance) pour induire une perception de la profondeur, par exemple dans les vitraux.
Quelques lignes minimalistes
Quelques lignes minimalistes
À la verticale :
À la verticale :
In[]:=
ListPlot[SeedRandom[1];RandomReal[1,{10^4,2}],AspectRatio->1,Axes->False,Background->Black,PlotRangePadding->.05,PlotStyle->PointSize[.007],ImageSize->550,ColorFunction->Function[{x,y},Blend[Riffle[Table[Red,4],Blue],Mod[x,1]]]]
Out[]=
À l’horizontale :
À l’horizontale :
In[]:=
ListPlot[SeedRandom[1];RandomReal[1,{10^4,2}],AspectRatio->1,Axes->False,Background->Black,PlotRangePadding->.05,PlotStyle->PointSize[.007],ImageSize->550,ColorFunction->Function[{x,y},Blend[Riffle[Table[Red,4],Blue],Mod[y,1]]]]
Out[]=
Application interactive
Application interactive
ManipulateListPlotpts,,{s,0,1/waves},SaveDefinitions->True,Initialization{waves=3,SeedRandom[1];pts=RandomReal[1,{10^4,2}]}
Out[]=
Génération de GiF
Génération de GiF
CITER CE NOTEBOOK
CITER CE NOTEBOOK