A193159 Numbers having in binary representation longest palindromic subwords not longer than 3.

1, 2, 3, 4, 5, 6, 7, 8, 10, 11, 12, 13, 14, 20, 23, 24, 26, 28, 29, 40, 52, 56, 58, 104, 116, 232

Offset: 1

Author

Reinhard Zumkeller, Jul 16 2011

Keywords

• nonn
• base
• fini
• full

Comments

A050430(a(n)) <= 3, 1 <= n <= 26.

Programs

Haskell

a193159 n = a193159_list !! (n-1)
a193159_list = map (+ 1) $ findIndices (<= 3) a050430_list