A048706 XOR-conjugate rules of 1-D cellular automata rules given in A048705.

150, 90, 2523490710, 199931532107794273605284333428918544790, 226413559313153607979257138616992421290

Offset: 1

Author

Antti Karttunen, Mar 09 1999

Keywords

• nonn

Comments

In hexadecimal this sequence looks like: 96,5A,96696996,96696996699696696996966996696996,

AA55AA55AA55AA5555AA55AA55AA55AA,

9966669966999966996666996699996666999966996666996699996699666699669999 6699666699669999669966669999666699669999669966669966999966, ...

Links

• Index entries for sequences related to cellular automata

Programs

Maple

# Other procedures as with A048705
rule90x150combination_xored := proc(n) local r,d,p,q,j,s,k,pattern;
p := extended_A020652[ n ]; # the Rule 150 component [ 0,1,op(A020652) ]
q := extended_A020653[ n ]; # the Rule 90 component [ 1,0,op(A020653) ]
r := p+q; # radius of CA.
d := (2*r)+1; # diameter of CA, including the cell itself.
s := 0; for k from 0 to (2^d)-1 do if(bit_i(k,r) <> bit_i(rule90(rule150(k,p),q),(2*r))) then s := s + 2^k; fi; od; RETURN(s); end;