A116616 Values of n such that prime(2n+1) mod 12 = 7.

5, 9, 13, 15, 23, 30, 31, 33, 36, 37, 42, 46, 47, 49, 50, 52, 55, 57, 58, 62, 64, 65, 66, 70, 71, 74, 76, 77, 78, 81, 83, 87, 88, 89, 90, 96, 103, 106, 108, 114, 116, 117, 121, 123, 124, 130, 134, 142, 144, 148, 151, 152, 160, 163, 166, 167, 175, 182, 185, 191, 192

Offset: 1

Author

Roger L. Bagula, Mar 29 2006

Keywords

• nonn

Examples

			33 is in the sequence because the 67th prime is 331 and 331 mod 12=7.
		

Links

• G. C. Greubel, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A116602, A116610, A116612-A116617, A160591-A160594. [M. F. Hasler, May 22 2009]

Programs

Maple

a:=proc(n) if ithprime(2*n+1) mod 12 = 7 then n else fi end: seq(a(n),n=0..215);

Mathematica

Select[Range[220], Mod[Prime[2# + 1], 12] == 7 &] (* Stefan Steinerberger, Apr 08 2006 *)

PARI

for(n=1,999, prime(2*n+1)%12==7 & print1(n",")) \\ M. F. Hasler, May 22 2009

Formula

Equals { odd terms in A160592 = A000720(A068229) } / 2, rounded towards zero. - M. F. Hasler, May 22 2009

Extensions

Edited by N. J. A. Sloane, Apr 05 2006