OFFSET
1,1
COMMENTS
LINKS
Eric Weisstein's World of Mathematics, Fibonacci n-Step Number.
FORMULA
a(n) = A106291(prime(n)).
MATHEMATICA
n=2; Table[p=Prime[i]; a=Join[Table[ -1, {n-1}], {n}]; a=Mod[a, p]; a0=a; k=0; While[k++; s=Mod[Plus@@a, p]; a=RotateLeft[a]; a[[n]]=s; a!=a0]; k, {i, 70}]
CROSSREFS
KEYWORD
nonn
AUTHOR
T. D. Noe, May 02 2005
STATUS
approved