OFFSET
0,6
COMMENTS
The fractional portion of a(n)/a(n-1) exponentially approaches 0 as n increases.
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..100
MATHEMATICA
RecurrenceTable[{a[0]==0, a[1]==1, a[n]==Mod[a[n-1], Fibonacci[n]]a[n-1]+ a[n-2]}, a, {n, 20}] (* Harvey P. Dale, Jul 06 2016 *)
PROG
(Magma)
a:= func< n | n le 2 select n-1 else (Self(n-1) mod Fibonacci(n-1))*Self(n-1) + Self(n-2) >;
[a(n): n in [1..21]]; // G. C. Greubel, Apr 20 2021
(Sage)
@CachedFunction
def a(n): return n if (n<2) else (a(n-1)%fibonacci(n))*a(n-1) + a(n-2)
[a(n) for n in (0..20)] # G. C. Greubel, Apr 20 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Gerald McGarvey, Aug 27 2004
STATUS
approved