OFFSET
1,1
COMMENTS
a(A049084(A045370(n-1))) is even; a(A049084(A045415(n-1))) is odd. - Reinhard Zumkeller, Feb 25 2008
LINKS
R. Zumkeller, Table of n, a(n) for n = 1..1000
MAPLE
seq(ithprime(n) mod 7, n=1..105); # Nathaniel Johnston, Jun 29 2011
MATHEMATICA
Table[Mod[Prime[n], 7], {n, 105}] (* Nathaniel Johnston, Jun 29 2011 *)
Mod[Prime[Range[100]], 7] (* Vincenzo Librandi, May 06 2014 *)
PROG
(Magma) [p mod(7): p in PrimesUpTo(500)]; // Vincenzo Librandi, May 06 2014
(PARI) primes(100)%7 \\ Charles R Greathouse IV, May 06 2014
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved