User Portlet

Victor Phan

Discussions

[JAM] CellularAutomaton Code Jam Wolfram Summer School 2015 ArrayPlot[ CellularAutomaton[{Mod[ Total[FactorInteger[FromDigits[#, 3]][[All, 1]]], 4] &, {}, 1}, {{4}, 1}, 400], ColorRules -> {1 -> White}, ImageSize -> Full] ![enter image description here][1] [1]:... AUTHOR: Vitaliy Kaurov 58986VIEWS 30REPLIES BY: Victor Phan 11 years ago