We seem to have been discussing this in July 2004, to judge from the
dates of a couple of old scripts in my collection,  cellauto.ijs and
cellautom.schott.ijs,  which suggests Brian was a correspondent. Cliff
Reiter and Henry Rich are mentioned in the former script....

The top of cellauto.ijs is commented as follows:

NB. For doing simplest kind of cellular automata in

NB. Stephen Wolfram's "New Kind of Science" (2002)

NB. By Kirby Urner, July 18, 2002


No more time to comment now, as about to go out.

Mike

On 04/10/2019 16:42, Raul Miller wrote:
There's also  an implementation at
https://rosettacode.org/wiki/One-dimensional_cellular_automata#J

    9  Rule 30] 0=i:9
_________#_________
________###________
_______##__#_______
______##_####______
_____##__#___#_____
____##_####_###____
___##__#____#__#___
__##_####__######__
_##__#___###_____#_

Or, if it's rewritten:

Rule=:1 :0 NB. , x: number of generations, m: rule number, y: start state
:
   '_#'{~ (3 ((|.m#:~8#2) {~ #.)\ 0,],0:)^:(i.x) y
)

    (30 Rule =&0@i:)9
_________#_________
________###________
_______##__#_______
______##_####______
_____##__#___#_____
____##_####_###____
___##__#____#__#___
__##_####__######__
_##__#___###_____#_

Thanks,




--
This email has been checked for viruses by Avast antivirus software.
https://www.avast.com/antivirus
----------------------------------------------------------------------
For information about J forums see http://www.jsoftware.com/forums.htm

Reply via email to