A039712 - OEIS

A039712

a(n) = n-th prime modulo 14.

2, 3, 5, 7, 11, 13, 3, 5, 9, 1, 3, 9, 13, 1, 5, 11, 3, 5, 11, 1, 3, 9, 13, 5, 13, 3, 5, 9, 11, 1, 1, 5, 11, 13, 9, 11, 3, 9, 13, 5, 11, 13, 9, 11, 1, 3, 1, 13, 3, 5, 9, 1, 3, 13, 5, 11, 3, 5, 11, 1, 3, 13, 13, 3, 5, 9, 9, 1, 11, 13, 3, 9, 3, 9, 1, 5, 11, 5, 9

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Nathaniel Johnston, Table of n, a(n) for n = 1..10000

MAPLE

seq(ithprime(n) mod 14, n=1..100); # Nathaniel Johnston, Jun 29 2011

MATHEMATICA

Table[Mod[Prime[n], 14], {n, 100}] (* Nathaniel Johnston, Jun 29 2011 *)

Mod[Prime[Range[100]], 14] (* Vincenzo Librandi, May 06 2014 *)

PROG

(Sage) [mod(p, 14) for p in primes(500)] # Bruno Berselli, May 05 2014