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 A352203 #27 Oct 27 2023 23:38:52 %S A352203 1,2,4,8,10,16,18,32,33,36,40,48,64,66,72,96,128,129,130,132,136,192, %T A352203 193,194,196,256,257,320,322,328,384,448,512,528,640,768,770,800,1024, %U A352203 1025,1028,1029,1280,1281,1312,1536,1538,1544,1792,1793,2048,2304,2560,2688,3072,3073,3074,3136,3200,3328,3584,3592,4096,4100,4101,4104,4160,5120 %N A352203 Records in A109812. %H A352203 Rémy Sigrist, <a href="/A352203/b352203.txt">Table of n, a(n) for n = 1..962</a> (terms 1..113 from N. J. A. Sloane, terms 114..380 from Michael De Vlieger) %H A352203 Rémy Sigrist, <a href="/A352203/a352203.txt">C++ program</a>. %t A352203 c[_] = 0; a[1] = c[1] = r = 1; u = 2; Reap[Do[k = u; While[Nand[c[k] == 0, BitAnd[a[i - 1], k] == 0], k++]; Set[{a[i], c[k]}, {k, i}]; If[k == u, While[c[u] > 0, u++]]; If[k > r, Sow[r]; Set[r, k]], {i, 2, 1980}]][[-1, -1]] (* _Michael De Vlieger_, Mar 29 2022 *) %o A352203 (C++) See Links section. %Y A352203 Cf. A109812, A352204. %K A352203 nonn %O A352203 1,2 %A A352203 _N. J. A. Sloane_ and _Chai Wah Wu_, Mar 28 2022