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

%I #17 Dec 12 2024 00:57:47

%S 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,

%T 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,

%U 1,3,13,13,3,5,9,9,1,11,13,3,9,3,9,1,5,11,5,9

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

%H Nathaniel Johnston, <a href="/A039712/b039712.txt">Table of n, a(n) for n = 1..10000</a>

%F Sum_k={1..n} a(k) ~ 7*n. - _Amiram Eldar_, Dec 12 2024

%p seq(ithprime(n) mod 14, n=1..100); # _Nathaniel Johnston_, Jun 29 2011

%t Table[Mod[Prime[n], 14], {n, 100}] (* _Nathaniel Johnston_, Jun 29 2011 *)

%t Mod[Prime[Range[100]], 14] (* _Vincenzo Librandi_, May 06 2014 *)

%o (Sage) [mod(p, 14) for p in primes(500)] # _Bruno Berselli_, May 05 2014

%o (Magma) [p mod(14): p in PrimesUpTo(500)]; // _Vincenzo Librandi_, May 06 2014

%Y Cf. A039701-A039706, A038194, A007652, A039709-A039711, A039713-A039715.

%K nonn,easy

%O 1,1

%A _Clark Kimberling_