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

310, 521, 831, 1352, 2183, 34135, 55218, 893413, 1445521, 2338934, 37714455, 61023389, 987377144, 1597610233, 2584987377, 41811597610, 67652584987, 1094641811597, 1771167652584, 28657109464181, 46368177116765

Offset

0,1

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: A134549 := proc(n) local f ; f := Fib(n) ; catL( catL(fibonacci(n+4), fibonacci(n+2)), fibonacci(n)) ; end: seq(A134549(n), n=0..28) ; # R. J. Mathar, Jan 30 2008

Mathematica

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

Crossrefs

Cf. A000045.

Sequence in context: A014369 A273593 A051981 * A304384 A206233 A254972

Adjacent sequences: A134546 A134547 A134548 * A134550 A134551 A134552

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