This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A048706 #13 Dec 05 2015 20:54:13 %S A048706 150,90,2523490710,199931532107794273605284333428918544790, %T A048706 226413559313153607979257138616992421290 %N A048706 XOR-conjugate rules of 1-D cellular automata rules given in A048705. %C A048706 In hexadecimal this sequence looks like: 96,5A,96696996,96696996699696696996966996696996, %C A048706 AA55AA55AA55AA5555AA55AA55AA55AA, %C A048706 9966669966999966996666996699996666999966996666996699996699666699669999 6699666699669999669966669999666699669999669966669966999966, ... %H A048706 <a href="/index/Ce#cell">Index entries for sequences related to cellular automata</a> %p A048706 # Other procedures as with A048705 %p A048706 rule90x150combination_xored := proc(n) local r,d,p,q,j,s,k,pattern; %p A048706 p := extended_A020652[ n ]; # the Rule 150 component [ 0,1,op(A020652) ] %p A048706 q := extended_A020653[ n ]; # the Rule 90 component [ 1,0,op(A020653) ] %p A048706 r := p+q; # radius of CA. %p A048706 d := (2*r)+1; # diameter of CA, including the cell itself. %p A048706 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; %K A048706 nonn %O A048706 1,1 %A A048706 _Antti Karttunen_, Mar 09 1999