A261466 Records in A261461.

1, 2, 3, 4, 5, 7, 8, 9, 10, 11, 13, 15, 16, 17, 18, 19, 20, 21, 22, 23, 25, 26, 27, 29, 31, 32, 33, 34, 35

Offset

1,2

Comments

a(n) = A261461(A261467(n)).

Links

Table of n, a(n) for n=1..29.

Prog

(Haskell)
a261466 n = a261466_list !! (n-1)
(a261466_list, a261467_list) = unzip $ (0, 1) : f 0 1 where
   f i x | y > x     = (y, i) : f (i + 1) y
         | otherwise = f (i + 1) x
         where y = a261461 i
(Python)
from itertools import count, islice
def f(n):
    b, k = bin(n)[2:], 1
    return next(k for k in count(1) if bin(k)[2:] not in b)
def agen(record=-1):
    yield from (((record:=f(k)), k)[0] for k in count(0) if f(k) > record)
print(list(islice(agen(), 18))) # Michael S. Branicky, Feb 26 2023

Crossrefs

Cf. A261461, A261467.

Sequence in context: A368087 A191849 A055019 * A172152 A218444 A325118

Adjacent sequences: A261463 A261464 A261465 * A261467 A261468 A261469

Keyword

nonn,more,base

Author

Reinhard Zumkeller, Aug 30 2015

Extensions

Initial terms corrected and more terms from Rémy Sigrist, Mar 10 2018

a(26)-a(29) from Rémy Sigrist, Feb 26 2023

Status

approved