login
A048706
XOR-conjugate rules of 1-D cellular automata rules given in A048705.
2
150, 90, 2523490710, 199931532107794273605284333428918544790, 226413559313153607979257138616992421290
OFFSET
1,1
COMMENTS
In hexadecimal this sequence looks like: 96,5A,96696996,96696996699696696996966996696996,
AA55AA55AA55AA5555AA55AA55AA55AA,
9966669966999966996666996699996666999966996666996699996699666699669999 6699666699669999669966669999666699669999669966669966999966, ...
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;
CROSSREFS
Sequence in context: A188873 A215689 A104262 * A054729 A116185 A008889
KEYWORD
nonn
AUTHOR
Antti Karttunen, Mar 09 1999
STATUS
approved