OFFSET
0,3
LINKS
Rémy Sigrist, Table of n, a(n) for n = 0..10000
Rémy Sigrist, C program for A127432
EXAMPLE
(0+9) is a multiple of a(0)=1; (1+9) is a multiple of a(1)=1; (3+9) is a multiple of a(3)=2; (6+9) is a multiple of a(6)=3 and (7+9) is a multiple of a(7)=4. These five cases are the only cases where (k+n) is divisible by a(k), for 0<=k<=8. So a(9) = 5.
MATHEMATICA
f[l_List] := Block[{n = Length[l]}, Append[l, Count[Table[Mod[k + n - 1, l[[k]]], {k, n}], 0]]]; Nest[f, {1}, 87] (* Ray Chandler, Jan 22 2007 *)
PROG
(C) See Links section.
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Leroy Quet, Jan 14 2007
EXTENSIONS
Extended by Ray Chandler, Jan 22 2007
STATUS
approved