A134550 Concatenate Fibonacci(n), Fibonacci(n+2) and Fibonacci(n+4).

13, 125, 138, 2513, 3821, 51334, 82155, 133489, 2155144, 3489233, 55144377, 89233610, 144377987, 2336101597, 3779872584, 61015974181, 98725846765, 1597418110946, 2584676517711, 41811094628657, 67651771146368

Offset

0,1

Comments

Leading zeros are omitted.

Links

Table of n, a(n) for n=0..20.

Maple

with(combinat) : catL := proc(i, j) i*10^(max(1, ilog10(j)+1))+j ; end: A134550 := proc(n) local f ; f := Fib(n) ; catL( catL(fibonacci(n), fibonacci(n+2)), fibonacci(n+4)) ; end: seq(A134550(n), n=0..28) ; # R. J. Mathar, Jan 30 2008

Mathematica

Table[FromDigits[Flatten[IntegerDigits/@Fibonacci/@{n, n+2, n+4}]], {n, 0, 20}] (* James C. McMahon, Apr 06 2025 *)

Crossrefs

Cf. A000045.

Sequence in context: A152583 A304353 A305916 * A316237 A317158 A305647

Adjacent sequences: A134547 A134548 A134549 * A134551 A134552 A134553

Keyword

nonn,base,easy

Author

Deuard Worthen (deuard(AT)tx.rr.com), Jan 23 2008, at the suggestion of N. J. A. Sloane

Extensions

More terms from R. J. Mathar, Jan 30 2008

Status

approved