Wolfram Programming Cloud

You can create this:

With this:


CloudDeploy[APIFunction[{
   "rule" -> Restricted["Number", {0, 255, 1}] -> 30, 
   "step" -> Restricted["Number", {0, Infinity, 1}] -> 50
   }, 
  ArrayPlot[CellularAutomaton[#rule, {{1}, 0}, #step], 
    Frame -> False] &,
  "PNG"
  ], Permissions -> "Public"]

Fun! Check out some of the fun stuff here https://www.wolframcloud.com

Flip Phillips is Protected by Akismet | Powered by WordPress