

A091017


Nonpalindromic integers which have an even number of ones in binary and whose reverse does too.


0



15, 17, 27, 29, 30, 34, 36, 43, 45, 51, 54, 57, 58, 60, 63, 68, 71, 72, 75, 85, 86, 90, 92, 102, 108, 113, 114, 126, 129, 132, 135, 139, 144, 147, 150, 159, 165, 170, 175, 177, 192, 195, 197, 198, 201, 204, 210, 216, 219, 226, 228, 231, 237, 264, 270, 288, 291
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS

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


EXAMPLE

15 is a member because 15_10 = 1111_2 has 4 1's and 51_10 = 110011_2 also has 4 1's.


MATHEMATICA

Reveral[n_] := FromDigits[ Reverse[ IntegerDigits[ n]]]; Select[ Range[ 296], Reveral[ # ] != # && EvenQ[ Count[ IntegerDigits[ #, 2], 1]] && EvenQ[ Count[ IntegerDigits[ Reveral[ # ], 2], 1]] &] (* Robert G. Wilson v, Feb 26 2004 *)


CROSSREFS

Cf. A006567, A001969, A000040.
Sequence in context: A155111 A124334 A002155 * A157716 A113968 A093812
Adjacent sequences: A091014 A091015 A091016 * A091018 A091019 A091020


KEYWORD

easy,nonn,base


AUTHOR

Michael Joseph Halm, Feb 25 2004


EXTENSIONS

Edited, corrected and extended by Robert G. Wilson v, Feb 26 2004


STATUS

approved



