A352203 - OEIS

A352203

Records in A109812.

1, 2, 4, 8, 10, 16, 18, 32, 33, 36, 40, 48, 64, 66, 72, 96, 128, 129, 130, 132, 136, 192, 193, 194, 196, 256, 257, 320, 322, 328, 384, 448, 512, 528, 640, 768, 770, 800, 1024, 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

(list; graph; refs; listen; history; text; internal format)

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

Cf. A109812, A352204.

Sequence in context: A339608 A268497 A093886 * A125732 A032533 A062884

Adjacent sequences: A352200 A352201 A352202 * A352204 A352205 A352206

KEYWORD

nonn

AUTHOR

N. J. A. Sloane and Chai Wah Wu, Mar 28 2022

STATUS

approved