OFFSET
1,1
LINKS
Nathaniel Johnston, Table of n, a(n) for n = 1..10000
MAPLE
seq(ithprime(n) mod 13, n=1..100); # Nathaniel Johnston, Jun 29 2011
MATHEMATICA
Mod[ Prime@ Range@ 80, 13] (* Robert G. Wilson v, Mar 13 2011 *)
PROG
(PARI) primes(1000)%13 \\ Charles R Greathouse IV, Mar 13 2011
(Sage) [mod(p, 13) for p in primes(500)] # Bruno Berselli, May 05 2014
(Magma) [p mod(13): p in PrimesUpTo(500)]; // Vincenzo Librandi, May 06 2014
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved