OFFSET
0,1
COMMENTS
LINKS
FORMULA
a(n) = 1 - A178225(n). - Antti Karttunen, Dec 15 2017
MATHEMATICA
Table[If[IntegerDigits[n, 2]==Reverse[IntegerDigits[n, 2]], 0, 1], {n, 0, 120}] (* Harvey P. Dale, Aug 07 2023 *)
PROG
(PARI) A178226(n) = (n!=subst(Polrev(binary(n)), x, 2)); \\ Antti Karttunen, Dec 15 2017
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Jeremy Gardiner, May 23 2010
STATUS
approved