A118604 a(n) = a(n-1) mod 13 + a(n-2) mod 8, with a(0) = 0 and a(1) = 1.

0, 1, 1, 2, 3, 5, 8, 13, 0, 5, 5, 10, 15, 4, 11, 15, 5, 12, 17, 8, 9, 9, 10, 11, 13, 3, 8, 11, 11, 14, 4, 10, 14, 3, 9, 12, 13, 4, 9, 13, 1, 6, 7, 13, 7, 12, 19, 10, 13, 2, 7, 9, 16, 4, 4, 8, 12, 12, 16, 7, 7, 14, 8, 14, 1, 7, 8, 15, 2, 9, 11, 12, 15, 6, 13, 6, 11, 17, 7, 8, 15, 2, 9, 11, 12

Offset

0,4

Links

Table of n, a(n) for n=0..84.

Formula

a(n) = a(n-1) mod 13 + a(n-2) mod 8, with a(0) = 0 and a(1) = 1.

Mathematica

a[0] = 0; a[1] = 1; a[n_] := a[n] = Mod[a[n - 1], 13] + Mod[a[n - 2], 8] aout = Table[a[n], {n, 0, 100}]

Crossrefs

Cf. A000045.

Sequence in context: A018149 A152909 A328597 * A261694 A287533 A072123

Adjacent sequences: A118601 A118602 A118603 * A118605 A118606 A118607

Keyword

nonn

Author

Roger L. Bagula, May 17 2006

Extensions

Edited by Michel Marcus, Jan 30 2013

Status

approved