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
Offset: 1
Links
- Nathaniel Johnston, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[p mod(14): p in PrimesUpTo(500)]; // Vincenzo Librandi, May 06 2014
-
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 *)
-
Sage
[mod(p, 14) for p in primes(500)] # Bruno Berselli, May 05 2014
Formula
Sum_k={1..n} a(k) ~ 7*n. - Amiram Eldar, Dec 12 2024