A247338 a(n) = Fibonacci(n) concatenated with Lucas(n).

2, 11, 13, 24, 37, 511, 818, 1329, 2147, 3476, 55123, 89199, 144322, 233521, 377843, 6101364, 9872207, 15973571, 25845778, 41819349, 676515127, 1094624476, 1771139603, 2865764079, 46368103682, 75025167761, 121393271443, 196418439204, 317811710647, 5142291149851

Offset

0,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Mathematica

Table[FromDigits[Join[Flatten[IntegerDigits[{Fibonacci[n], LucasL[n]}]]]], {n, 0, 50}]

Prog

(Magma) [Seqint(Intseq(Lucas(n)) cat Intseq(Fibonacci(n))): n in [0..50]];
(PARI) a(n)=eval(Str(fibonacci(n), fibonacci(n-1)+fibonacci(n+1))) \\ Charles R Greathouse IV, Sep 14 2014

Crossrefs

Cf. A000032, A000045, A235497, A246972, A246973.

Sequence in context: A022115 A042453 A041885 * A154742 A257329 A063587

Adjacent sequences: A247335 A247336 A247337 * A247339 A247340 A247341

Keyword

nonn,easy,base

Author

Vincenzo Librandi, Sep 14 2014

Status

approved