A030363 Write (n+1)st Fibonacci number in base 3 and juxtapose.
1, 2, 1, 0, 1, 2, 2, 2, 1, 1, 1, 2, 1, 0, 1, 0, 2, 1, 2, 0, 0, 1, 1, 0, 0, 2, 2, 1, 2, 1, 0, 0, 2, 2, 1, 2, 2, 1, 1, 1, 2, 2, 2, 2, 1, 1, 1, 2, 1, 1, 1, 0, 0, 1, 2, 0, 2, 0, 1, 2, 0, 1, 1, 1, 0, 1, 1, 2, 2, 0, 1, 1, 2, 2, 0, 1, 2, 1, 2, 1, 0, 0, 0, 2, 1, 1, 2, 0, 1, 2
Offset: 1
Crossrefs
Cf. A004686 (Fibonacci numbers written in base 3).
Programs
-
Mathematica
Flatten[IntegerDigits[Fibonacci[Range[2,30]],3]] (* Harvey P. Dale, Apr 09 2015 *)