A247337 a(n) = Lucas(n) concatenated with Fibonacci(n).
20, 11, 31, 42, 73, 115, 188, 2913, 4721, 7634, 12355, 19989, 322144, 521233, 843377, 1364610, 2207987, 35711597, 57782584, 93494181, 151276765, 2447610946, 3960317711, 6407928657, 10368246368, 16776175025, 271443121393, 439204196418, 710647317811, 1149851514229
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[20] cat [Seqint(Intseq(Fibonacci(n)) cat Intseq(Lucas(n))): n in [1..50]];
-
Mathematica
Table[FromDigits[Join[Flatten[IntegerDigits[{LucasL[n], Fibonacci[n]}]]]], {n, 0, 50}]