Elementary cellular automaton/Random number generator: Difference between revisions
Elementary cellular automaton/Random number generator (view source)
Revision as of 23:45, 4 June 2021
, 2 years agono edit summary
(Added Wren) |
No edit summary |
||
Line 346:
220 197 147 174 117 97 149 171 100 151
</pre>
=={{header|Mathematica}} / {{header|Wolfram Language}}==
<lang Mathematica>FromDigits[#, 2] & /@ Partition[Flatten[CellularAutomaton[30, {{1}, 0}, {200, 0}]], 8]</lang>
{{out}}
<pre>{220, 197, 147, 174, 117, 97, 149, 171, 240, 241, 92, 18, 199, 27, 104, 8, 251, 167, 29, 112, 100, 103, 159, 129, 253}</pre>
=={{header|Nim}}==
| |||