Crie um website complexo sobre autômatos celulares básicos: Novos Recursos do Wolfram Language 11

Crie um website complexo sobre autômatos celulares básicos

Usando URLDispatcher e GalleryView, você pode criar websites complexos em apenas uma implementação. Você pode definir uma visão global na URL base e visões detalhadas nas URLs numeradas.

In[1]:=

CloudDeploy[
 URLDispatcher[{
   "/" ~~ EndOfString -> GalleryView[
     Table[
      Hyperlink[
       ArrayPlot[CellularAutomaton[i, {{1}, 0}, {50, All}]],
       "/objects/documentation@wolfram.com/cellularautomata/" <> 
        ToString[i]
       ],
      {i, 0, 255}
      ]
     ],
   "/" ~~ n : DigitCharacter .. ~~ EndOfString :> ExportForm[Column[{
       "Rule " <> n,
       RulePlot[CellularAutomaton[FromDigits[n]]],
       ArrayPlot[CellularAutomaton[FromDigits[n], {{1}, 0}, {50, All}]]
       }], "HTML"]
   }],
 "user:documentation@wolfram.com/cellularautomata/"
 ]

Out[1]=