OFFSET
1,2
LINKS
Rémy Sigrist, Table of n, a(n) for n = 1..962 (terms 1..113 from N. J. A. Sloane, terms 114..380 from Michael De Vlieger)
Rémy Sigrist, C++ program.
MATHEMATICA
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 *)
PROG
(C++) See Links section.
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane and Chai Wah Wu, Mar 28 2022
STATUS
approved