OFFSET
1,3
LINKS
EXAMPLE
The first terms are:
n a(n) A215022(a(n))
-- ---- -------------
1 0 0
2 1 1
3 3 101
4 6 10001
5 8 10101
6 11 1001001
7 14 1000001
8 21 1010101
9 24 100101001
10 35 100000001
PROG
(PARI) is(n) = { my (v=0, neg=0, pos=0, f); for (e=0, oo, f=fibonacci(-1-e); if (f<0, neg+=f, pos+=f); if (neg <=n && n <= pos, while (n, if (f<0, neg-=f, pos-=f); if (neg > n || n > pos, v+=2^e; n-=f); f=fibonacci(-1-e--)); my (b=binary(v)); return (b==Vecrev(b)))) }
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Rémy Sigrist, Aug 05 2022
STATUS
approved