OFFSET
1,2
COMMENTS
No more terms < 9*10^18. - Lars Blomberg, Jan 04 2019
EXAMPLE
350 = (1,1,0,2,2,2) in base 3;
F(350) = (1,2,1,2,2,0,...1,1,0,2,2,2) in base 3.
MATHEMATICA
fibo[n_, b_]:={au=Fibonacci[n], ab=Floor[Log[b, n]]+1, Mod[au, b^ab]==n}//Last; Select[Range[500000], fibo[#, 3]&]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
José María Grau Ribas, Aug 05 2011
EXTENSIONS
a(5) from Alois P. Heinz, Aug 05 2011
a(6) from Lars Blomberg, Jan 04 2019
STATUS
approved