A051830 Fibonacci(Pn+1) mod Pn, where Pn is the n-th prime.

0, 0, 3, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 0, 0, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 0, 0, 0, 1, 1, 1, 0, 0, 1, 1, 0, 0, 1, 0, 1, 1, 1, 0, 0, 1, 1, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 0, 0

Offset

1,3

Comments

Terms are 1 when Pn == 1 or 4 mod 5, terms are 0 when Pn == 2 or 3 mod 5.

Links

Table of n, a(n) for n=1..103.

Example

P3=5, Fibonacci(5-1)=3 mod 5.

Mathematica

Table[Mod[Fibonacci[n+1], n], {n, Prime[Range[110]]}] (* Harvey P. Dale, Nov 27 2015 *)

Crossrefs

Cf. A000045, A003631, A045468, A051834, A051831.

Sequence in context: A260073 A196306 A107093 * A356098 A106216 A035676

Adjacent sequences: A051827 A051828 A051829 * A051831 A051832 A051833

Keyword

nonn

Author

Jud McCranie, Dec 11 1999

Status

approved