A057924 Sequence b(n) mentioned in A057923.

2, 3, 5, 6, 7, 13, 14, 15, 25, 26, 27, 29, 30, 31, 45, 46, 47, 49, 50, 51, 53, 54, 55, 61, 62, 63, 89, 90, 91, 93, 94, 95, 125, 126, 127, 225, 226, 227, 229, 230, 231, 237, 238, 239, 249, 250, 251, 253, 254, 255, 397, 398, 399, 401, 402, 403, 405, 406, 407, 413, 414

Offset: 1

Author

Larry Reeves (larryr(AT)acm.org), Oct 03 2000

Keywords

• easy
• nonn

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A057923, A057925.

Programs

Maple

A[0]:= 0: A[1]:= 2: B[1]:= 2:
for n from 2 to 100 do
  for k from B[n-1]-A[n-1] do
    b:= Bits:-Or(A[n-1],k);
    if b > B[n-1] then A[n]:= k; B[n]:= b; break fi
  od;
od:
seq(B[n],n=1..100); # Robert Israel, Aug 13 2017