|
%I #18 Sep 08 2022 08:46:09
%S 2,11,13,24,37,511,818,1329,2147,3476,55123,89199,144322,233521,
%T 377843,6101364,9872207,15973571,25845778,41819349,676515127,
%U 1094624476,1771139603,2865764079,46368103682,75025167761,121393271443,196418439204,317811710647,5142291149851
%N a(n) = Fibonacci(n) concatenated with Lucas(n).
%H Vincenzo Librandi, <a href="/A247338/b247338.txt">Table of n, a(n) for n = 0..1000</a>
%t Table[FromDigits[Join[Flatten[IntegerDigits[{Fibonacci[n], LucasL[n]}]]]], {n, 0, 50}]
%o (Magma) [Seqint(Intseq(Lucas(n)) cat Intseq(Fibonacci(n))): n in [0..50]];
%o (PARI) a(n)=eval(Str(fibonacci(n),fibonacci(n-1)+fibonacci(n+1))) \\ _Charles R Greathouse IV_, Sep 14 2014
%Y Cf. A000032, A000045, A235497, A246972, A246973.
%K nonn,easy,base
%O 0,1
%A _Vincenzo Librandi_, Sep 14 2014
|
