cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A038399 Concatenate first n nonzero Fibonacci numbers in reverse order.

This page as a plain text file.
%I A038399 #16 Apr 06 2024 07:53:04
%S A038399 1,11,211,3211,53211,853211,13853211,2113853211,342113853211,
%T A038399 55342113853211,8955342113853211,1448955342113853211,
%U A038399 2331448955342113853211,3772331448955342113853211,6103772331448955342113853211,9876103772331448955342113853211
%N A038399 Concatenate first n nonzero Fibonacci numbers in reverse order.
%D A038399 Mihaly Bencze [Beneze], L. Tutescu, Some Notions and Questions in Number Theory, Sequence 7.
%H A038399 Reinhard Zumkeller, <a href="/A038399/b038399.txt">Table of n, a(n) for n = 1..96</a>
%t A038399 Module[{nn=20,fibs},fibs=Fibonacci[Range[nn]];Table[FromDigits[ Flatten[ IntegerDigits/@ Reverse[Take[fibs,n]]]],{n,nn}]] (* _Harvey P. Dale_, Aug 30 2016 *)
%o A038399 (Haskell)
%o A038399 a038399 n = a038399_list !! (n-1)
%o A038399 a038399_list = h "" $ tail a000045_list where
%o A038399    h xs (f:fs) = (read ys :: Integer) : h ys fs
%o A038399      where ys = show f ++ xs
%o A038399 -- _Reinhard Zumkeller_, Mar 01 2014
%o A038399 (PARI) a(n) = my(t=fibonacci(n)); forstep(k=n-1, 1, -1, t=t*10^#Str(fibonacci(k))+fibonacci(k)); t; \\ _Michel Marcus_, Apr 06 2024
%Y A038399 Cf. A000045, A000422, A019523.
%K A038399 nonn,base,easy,less
%O A038399 1,2
%A A038399 M. I. Petrescu (mipetrescu(AT)yahoo.com)
%E A038399 More terms from Andrew Gacek (andrew(AT)dgi.net), Feb 21 2000
%E A038399 Offset changed by _Reinhard Zumkeller_, Mar 01 2014
%E A038399 More terms from _Harvey P. Dale_, Aug 30 2016