A030413 Write (n+1)st Fibonacci number in base 4 and juxtapose.
1, 2, 3, 1, 1, 2, 0, 3, 1, 1, 1, 1, 2, 0, 2, 3, 1, 3, 1, 1, 2, 1, 2, 1, 0, 0, 3, 2, 2, 1, 1, 1, 3, 2, 1, 2, 1, 2, 0, 2, 3, 3, 1, 2, 3, 1, 2, 0, 3, 3, 1, 2, 2, 0, 1, 2, 0, 1, 0, 0, 1, 1, 1, 1, 1, 2, 2, 1, 2, 3, 1, 2, 2, 2, 3, 0, 0, 2, 1, 0, 1, 1, 0, 2, 3, 3, 1, 2, 3, 3
Offset: 1
Keywords
Programs
-
Mathematica
Rest[Flatten[IntegerDigits[#,4]&/@Fibonacci[Range[30]]]] (* Harvey P. Dale, Jun 06 2011 *)