A195066 Numbers n such that BCR(n) is not less than n, where BCR = binary-complement-and-reverse = A036044.

0, 2, 4, 8, 10, 12, 16, 18, 20, 24, 32, 34, 36, 38, 40, 42, 44, 48, 52, 56, 64, 66, 68, 70, 72, 74, 76, 80, 82, 84, 88, 92, 96, 100, 104, 112, 128, 130, 132, 134, 136, 138, 140, 142, 144, 146, 148, 150, 152, 154, 156, 160, 162, 164, 168, 170, 172, 176, 178

Offset: 1

Author

Reinhard Zumkeller, Sep 16 2011

Keywords

• nonn
• base
• look

Comments

A035928(a(n)) >= n.

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Programs

Haskell

a195066 n = a195066_list !! (n-1)
a195066_list = filter (\x -> a036044 x >= x) [0,2..]