login
A090183
a(n) = (10 - (prime(n+3) mod 10) mod 4) - (n mod 4) + 3.
0
5, 2, 3, 6, 3, 4, 1, 4, 5, 2, 3, 6, 5, 2, 1, 6, 3, 4, 1, 6, 3, 4, 1, 6, 5, 2, 3, 6, 3, 4, 1, 4, 3, 4, 3, 6, 5, 2, 1, 4, 5, 4, 1, 4, 5, 4, 1, 6, 3, 2, 1, 6, 5, 2, 1, 6, 3, 4, 3, 6, 3, 4, 3, 4, 5, 4, 1, 6, 3, 4, 3, 4, 5, 2, 3, 4, 3, 2, 1, 4, 5, 2, 3, 4, 5, 2, 3, 6, 3, 4, 1, 4, 5, 2, 1, 6, 3, 4, 3, 6, 3, 2, 3, 6, 5
OFFSET
1,1
MATHEMATICA
Table[Mod[10-Mod[Prime[n+3], 10], 4]-Mod[n, 4]+3, {n, 1, 200}]
CROSSREFS
Sequence in context: A019673 A229780 A272031 * A063572 A205294 A372806
KEYWORD
nonn,less
AUTHOR
Roger L. Bagula, Jan 20 2004
EXTENSIONS
Offset changed to 1 by Georg Fischer, Jan 09 2026
STATUS
approved