OFFSET
0,4
COMMENTS
Or, Fibonacci numbers reversed.
LINKS
N. J. A. Sloane and Alois P. Heinz, Table of n, a(n) for n = 0..1000
N. J. A. Sloane, Transforms
N. J. A. Sloane, Maple program for A004091
FORMULA
MAPLE
a:= n-> (s-> parse(cat(s[-i]$i=1..length(s))))(
""||((<<0|1>, <1|1>>^n)[1, 2])):
seq(a(n), n=0..50); # Alois P. Heinz, Apr 09 2015
MATHEMATICA
FromDigits[Reverse[IntegerDigits[#]]]&/@Fibonacci[Range[50]] (* Harvey P. Dale, Jun 10 2011 *)
IntegerReverse[Fibonacci[Range[0, 50]]] (* Harvey P. Dale, Jun 21 2024 *)
PROG
(Haskell)
a004091 = a004086 . a000045 -- Reinhard Zumkeller, Mar 08 2013
(Magma) [Seqint(Reverse(Intseq(Fibonacci(n)))): n in [0..50]]; // Vincenzo Librandi, Jan 17 2016
(PARI) a(n) = fromdigits(Vecrev(digits(fibonacci(n)))); \\ Michel Marcus, Mar 25 2024
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved