login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A352203 Records in A109812. 15
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
Sequence in context: A339608 A268497 A093886 * A125732 A032533 A062884
KEYWORD
nonn
AUTHOR
N. J. A. Sloane and Chai Wah Wu, Mar 28 2022
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 15:38 EDT 2024. Contains 371254 sequences. (Running on oeis4.)