login
A004091
Fibonacci numbers written backwards.
7
0, 1, 1, 2, 3, 5, 8, 31, 12, 43, 55, 98, 441, 332, 773, 16, 789, 7951, 4852, 1814, 5676, 64901, 11771, 75682, 86364, 52057, 393121, 814691, 118713, 922415, 40238, 9626431, 9038712, 8754253, 7882075, 5647229, 25303941, 71875142, 96188093, 68954236, 551433201, 141085561, 692419762, 734494334, 337804107, 713094311, 3091136381, 3705121792
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
a(n) = A004086(A000045(n)). - Reinhard Zumkeller, Mar 08 2013
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
STATUS
approved