A175543 Nonnegative integers that, when written in binary, are palindromes with a middle run of 0's.

0, 5, 9, 17, 27, 33, 51, 65, 85, 99, 119, 129, 165, 195, 231, 257, 297, 325, 365, 387, 427, 455, 495, 513, 585, 645, 717, 771, 843, 903, 975, 1025, 1105, 1161, 1241, 1285, 1365, 1421, 1501, 1539, 1619, 1675, 1755, 1799, 1879, 1935, 2015, 2049, 2193, 2313, 2457

Offset

1,2

Links

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

Mathematica

fQ[n_] := Block[{id = IntegerDigits[n, 2]}, id == Reverse@ id && id[[ Ceiling[ Length@ id/2] ]] == 0]; Select[ Range[0, 2564], fQ@# &] (* Robert G. Wilson v, Jun 27 2010 *)

Crossrefs

Cf. A006995, A175544.

Sequence in context: A089109 A100449 A146284 * A200078 A190806 A294774

Adjacent sequences: A175540 A175541 A175542 * A175544 A175545 A175546

Keyword

base,nonn

Author

Leroy Quet, Jun 23 2010

Extensions

a(9)-a(51) from Robert G. Wilson v, Jun 27 2010

Status

approved