Prime Art
Background
This algorithim takes an input of an image, and will find a prime number which corressponds to said image. I used it for making my Christmas cards. I've also found one which matches the MIT logo.
Prime Number
Use code below to generate this images
Prime
MIT Prime:
66350336683860083550085633806356858508365335368380333835560885656850868886880863583580686885656636330386036500858000565660350866588668555650030868638888535003863680836606535863555635563663383686303030055580603305053585383888355866305056368866368505655503856506503556086008855565388583666530663088558800535858583633330803533653638508053830550650006530585308003063333350688068335356355536008368035365033066606535835303568000553868853585500658008005355833350068355050805866665665333033863050863565383303530686033365386866833838830658686866680306088358803563835803635656005886555055505000333688386635880385338686633533505863638506603365566635803630583306033603008355633065883585533835335538336655800038085360006636005038033633606538088630333685003865508888883638383508056530080638600530355568060366866886558566800650065353650506050585886560865655535068505355503560006636533883850556653553050003338055355885800880833388055663035550500665338856538636583585635506855830835855050833660308888803080583383088353838853880066008005808563683066085565508050530806083685568860303380058565030833330086356588333058066358055606560866580355603338335385563383330356685030535083605050688835056806668555006506305850088830305036603680511111111303081111111115883811111111653885111111118355311111111111111111111116060686630080568080386061111111136665111111111353501111111168838011111111083331111111111111111111111350868530083853630585380111111110500611111111105508111111118803051111111158050111111111111111111111160686666666388363355563311111111388081111111115560011111111563355111111110066011111111111111111111113650583030358656388800831111111103538111111111335831111111136508811111111566081111111111111111111111636500305003683866330083111111116086811111111155658111111118383881111111133636111111111111111111111133505530600306800503663511111111360001111111116688311111111065883111111116608511111111111111111111110380503085555630665833831111111106058111111111860661111111158338811111111360331111111111111111111111355036668560058363300355111111115363511111111160830111111115806360685838338080308068830838535566833556036000386888883386356011111111585031111111113335511111111668050560550580835050338838563608636868835366538683886366656063851111111130860111111111053801111111183008888600866033638838633300303556568500665686830855385368036638111111110856011111111100835111111113065835605888683880838008336003053553060668083605306885380806303511111111065001111111116808011111111680861111111113683611111111150308500306305605603688055836608656681111111156688111111111833851111111180806111111111358601111111118388000365308800335666633553588085853111111110553011111111108383111111116038811111111103865111111111586660353660650608668885666553868563511111111066801111111110383811111111065061111111118386811111111136888588000806060065605566886880030561111111135838111111111350001111111183538111111111603561111111110005836880305365303866336506380656855111111118086611111111185030111111116088011111111100886111111111503383386555580306500060658356530680811111111606881111111118388811111111835051111111115366511111111155585566666000600038886005880535650051111111166588111111111688051111111156508111111111500851111111113065053656365553603858068855863538880111111110850811111111183005111111110835011111111158588111111111680368535830838653568366553088580506011111111006601111111115665511111111633061111111110330311111111100083530563083553386086306033888535601111111153066111111111565551111111153600111111111500061111111115600880003308055060055080635533866083111111110503611111111156388111111110883311111111133580111111111860338838006800685386886633886666588811111111886681111111113055511111111556061111111116038011111111166630058653533803533636683605683653561111111135386111111111650501111111166555111111111363651111111118006030668630336805563835038885838838111111115605056368305805056111111118885011111111150363111111111806688580560560030836583338560835805811111111363355883033600333311111111033031111111110365511111111100383886605056635606088055033683366331111111185653556568560850651111111133608111111111883661111111118606056633505356688805883665600300580111111115336335838055008665111111118805511111111165555111111111366508685353353008300883083685503333311111111653358586508658660611111111635561111111116863811111111150858633508805665086683865805036308801111111183383036853655350631111111158068111111111380531111111115360853355033668680335808800008008558111111116566606605535058355111111110038611111111165856111111111638830036880330856603803535835838655511111111565686866035833566011111111350381111111115635011111111156536585058336065660350356055536506851111111135633885500505305331111111165360111111111656581111111116853353050660860683333380305566506368111111110386868856056558838111111116335811111111158055111111111388888385686803080665500380500083605011111111865655380585533303311111111868661111111116606011111111133538085030083660600530350058005806301111111136688056055605808301111111138368111111111088831111111118500350086808353386356636308685085088368356380660600665855365688885565653338085586058063053806868360685005053565650636536588860356566535588553636060688603356560888385008360665500588058830363336363380850068686360333563063300650300036063638636388088656053583856056680888556353355005555058686666060650535356808388035503080055650336830866660508080868055336863838008030085686085608038680065503355630508335865533008853365580055508830383630863033386038660565086366886360853050068055055560550668853033300836633865536505333386306088660683630536533653680658550388356356886805850065686856000830588586508383380853058685088336585563803635036688060063500560858850563350383665056506866383306083606535566360605858630560886308608338863386503360605068835380556330660536300356588330588638533588035333886865868606688338388030060308658068838066005606833556536063805330658388568580388333830330866355683636066555505005856586603336505050858560083503665856586060383633803503050830388036300658363838305656530030383535568006008366885500580688886653355560008330600005888650853585665888660555606863368088886886635563335085383350065333586065350505008308853033866588360006366605650366338668838868536803855035868850653003866505065586506363666305855300533663
1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111108811111111111868311111538630360011111585068611111111833068531111110601111111113851111111111111111113566111111111150081111155680833801111356888835301111108058833031111688111111111581111111111111111111000611111111118856111116511111111111183011111505111110861111168811113381111111038111111111111111111105051111111115866511111351111111111113861111118001111050111111063111183111111133111111111111111111116613511111111681551111108111111111111603111111150111138511111116011115531111180511111111111111111111501351111111500183111118611111111111163611111113311116031111111801111163111110011111111111111111111163133111111100118511111631111111111115361111111501111838111111108111118381110511111111111111111111115610801111113811601111136111111111111883111111555111133011111165011111136111331111111111111111111110651185111113881100111115011111111111138811111138111110381111116611111115081501111111111111111111111536113561111531113811111008603036311118601110563811111066111386511111111155380111111111111111111111185811650111136111601111100633303881111560550803111111136303508611111111116508111111111111111111111118631118311156011105111118611111111111136011185351111115601118566111111111166811111111111111111111111308111005110811110511111851111111111110001111100811111088111113381111111116581111111111111111111111168111156611661111651111183111111111111686111111631111106511111556111111111530111111111111111111111116511111581831111160111118611111111111166011111180811110081111110011111111105611111111111111111111111361111136160111110381111531111111111113601111115301111066111111086111111110651111111111111111111111130111116558511111500111160111111111111065111111363111135011111105511111111300111111111111111111111110611111158311111166511116611111111111155611111116311118351111113531111111185011111111111111111111111331111115551111116881111663363368361113631111111505111305111111133111111116061111111111111111111111168111111836111111583111186638505065111383111111136311103311111113051111111000111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111118561111111110011111053111111111115331111111111035011111111111586068301111111111111111111111111111111105011111118661111163801111111111665111111111106501111111111303558858111111111111111111111111111111111501111118061111116658111111111355011111111116603111111111556111111111111111111111111111111111111111138511111031111111385011111111135836111111116060661111111153111111111111111111111111111111111111111111581111630111111883068111111158385811111111631163111111115311111111111111111111111111111111111111111103511103111111163510311111118816801111111100118511111111581111111111111111111111111111111111111111111803138811111118601301111111681868111111163311650111111103011111111111111111111111111111111111111111183563611111111081133311111638163311111110811116611111118565111111111111111111111111111111111111111111535311111111183111631111136118801111111381111561111111153033111111111111111111111111111111111111111113561111111118011158111110311106111111330111130511111111135383111111111111111111111111111111111111115063111111111381118381115611110311111150111111381111111111168666111111111111111111111111111111111111086051111111155111166111351111001111116330663860111111111111138011111111111111111111111111111111111661105811111118011115611130111100111116368656636531111111111111380111111111111111111111111111111111603115881111111351111030185111113311111001111111130111111111111106811111111111111111111111111111111136111166011111156111116818011111031111168111111113361111111111111651111111111111111111111111111111163511111631111113311111333351111135111153811111111508111111111111668111111111111111111111111111111115611111188311111051111106861111113011115511111111113011111111111165311111111111111111111111111111113681111111055111158111111366111111361111581111111111885111661111188811111111111111111111111111111118361111111183511133511111153011111150111358111111111150811005335863011111111111111111111111111111111353111111111880118801111113311111118511105111111111111661111086563111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111116003083606011116353338561111111111036880085111111111056111111111115851111111111111111111111111111111888033085881111065553886311111111855086553001111111063511111111115358111111111111111111111111111111166611111111111103111111888111111556111111133811111186680111111111566011111111111111111111111111111115631111111111115011111110811111853111111111658111115305811111111165001111111111111111111111111111111850111111111111031111111333111380111111111100311111501501111111185150111111111111111111111111111111165611111111111136111111168011136511111111111608111185138611111118018011111111111111111111111111111115881111111111113011111113511115011111111111106311113511881111113051606111111111111111111111111111111356111111111111551111111801113651111111111116881111581165111111061105811111111111111111111111111111166811111111111163111115551111385111111111111103111166115601111155116551111111111111111111111111111118855585803111118580058081111105011111111111110511116011133111108511558111111111111111111111111111111036600688811111366085503111118501111111111111381111051110601113511108311111111111111111111111111111163011111111111168111110651111863111111111111188111136111880111631118361111111111111111111111111111113361111111111116611111136111113811111111111150811115311110311501111380111111111111111111111111111111336111111111111801111118651111888111111111113301111551111001130111113011111111111111111111111111111165811111111111156111111056111188611111111111601111180111100318811111001111111111111111111111111111116631111111111113011111116011111535111111111533111183511111653311111108111111111111111111111111111111565111111111111601111111001111155561111111065111115351111138081111115611111111111111111111111111111168511111111111130111111130311111855811118030111111530111115005111111881111111111111111111111111111115031111111111113811111110031111116883865630111111158311111188111111150111111111111111111111111111111655111111111111881111111185111111111086381111111118681111111111111110511111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111055656350533058111111566330111111111168031111111111130611111805111111111111111111111111111111111111108365358006688311116635033053111111116600111111111155651111136311111111111111111111111111111111111111111118031111111113360111160551111111665311111111113606111113001111111111111111111111111111111111111111111656111111110361111111155011111130883111111111688011111538111111111111111111111111111111111111111111106811111111531111111111856111113510311111111601581111100011111111111111111111111111111111111111111110031111111353111111111105311111601061111111163153111118361111111111111111111111111111111111111111111530111111138111111111111303111138186011111180310311111833111111111111111111111111111111111111111111183311111153611111111111168511118311651111116611031111188811111111111111111111111111111111111111111118851111113561111111111113801111381185111111301183111113881111111111111111111111111111111111111111111680111111833111111111111633111138113061111003115811111033111111111111111111111111111111111111111111135511111130311111111111100611113811103111160111688111180511111111111111111111111111111111111111111113001111113801111111111113851111631118811115611105311110001111111111111111111111111111111111111111111850111111506111111111111865111153111333113511113561111666111111111111111111111111111111111111111111138511111100511111111111186311108511116011001111333111163511111111111111111111111111111111111111111115531111111655111111111116311116381111601100111185311115361111111111111111111111111111111111111111111363111111108311111111116561111080111135868111110081111388111111111111111111111111111111111111111111163611111111663111111116661111135011111838511111535111185311111111111111111111111111111111111111111116681111111183531111115800111118661111105551111110011115001111111111111111111111111111111111111111111000111111111633600385058111111301111113561111111861111806111111111111111111111111111111111111111111130011111111111868360651111111150111111130111111158111166011111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111
Code
mitlogo =Import["https://download.logo.wine/logo/Massachusetts_Institute_of_Technology/Massachusetts_Institute_of_Technology-Logo.wine.png"];
img = ColorConvert[mitlogo,"Grayscale"]
(* to binary *)
img = Binarize[img];
(* dimensions *)
dim1 = 100;
dim2 = Round[dim1/1.6]
img =ImageResize[img,{dim1,dim2}]
imgdata =ImageData[img];
(* 1 is white *)
(* 0 is black - replace these with 0,3,5,6,8*)
positions=Position[imgdata,0];
random = Table[RandomChoice[{0,3,5,6,8}],Dimensions[positions][[1]]];
imgdata2=ReplacePart[imgdata,Thread[positions->random]];
imgdata2num = FromDigits[Flatten[imgdata2]];
i=1;
Monitor[While[PrimeQ[imgdata2num]===False,
(* pick out 0,3,5,6,8 *)
positions=Flatten[Position[imgdata2,#]&/@{0,3,5,6,8},1];
(* randomly pick one *)
positiontochange = RandomChoice[positions];
(* replace it to another (hopefully *)
imgdata2=ReplacePart[imgdata2,positiontochange-> RandomChoice[{0,3,5,6,8}]];
(* check if prime *)
imgdata2num = FromDigits[Flatten[imgdata2]];
i++
],{i}]
PrimeQ[imgdata2num]
imgdata3=IntegerDigits[imgdata2num];
imgdata3=ArrayReshape[imgdata2,{dim2,dim1}];
imgoutput=Rasterize[MatrixForm[imgdata3],ImageResolution->600];
Export["imgoutputnew2.png",imgoutput];
Export["imgoutputnew2.txt",Flatten[imgdata3]];
imgdata3=ArrayReshape[imgdata2,{dim2,dim1}];
Rasterize[MatrixForm[imgdata3],ImageResolution->600]