OFFSET
0,5
REFERENCES
Ivars Peterson, The Jungles of Randomness, 1998, John Wiley and Sons, Inc., page 207
FORMULA
f(x)=f(x - 1) + f(x - 2) + Floor[f(x - 1)/10];
a(n)=Mod[f(n),10].
MATHEMATICA
f[0] = f[1] = 1; f[x_] := f[x] = f[x - 1] + f[x - 2] + Floor[f[x - 1]/10];
Table[Mod[f[n], 10], {n, 0, 100}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Dec 02 2008
STATUS
approved