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

Author

Vincenzo Librandi, Sep 14 2014

Keywords

• nonn
• easy
• base

Links

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

Crossrefs

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

Programs

Magma

[Seqint(Intseq(Lucas(n)) cat Intseq(Fibonacci(n))): n in [0..50]];

Mathematica

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

PARI

a(n)=eval(Str(fibonacci(n),fibonacci(n-1)+fibonacci(n+1))) \\ Charles R Greathouse IV, Sep 14 2014