OFFSET
1,3
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..1000
EXAMPLE
7 is a term since the binary representation of 7, 111, and the negabinary representation of 7, 11011, are both palindromic.
MATHEMATICA
negabin[n_] := negabin[n] = If[n==0, 0, negabin[Quotient[n-1, -2]]*10 + Mod[n, 2]]; Select[Range[0, 2*10^4], And @@ (PalindromeQ /@ {IntegerDigits[#, 2], negabin[#]}) &]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amiram Eldar, Jan 30 2020
STATUS
approved