A116610 Values of n such that prime(2*n) mod 12 = 11.

10, 14, 16, 26, 27, 28, 32, 36, 38, 43, 46, 47, 48, 59, 60, 62, 64, 66, 72, 73, 75, 77, 78, 82, 83, 91, 95, 96, 100, 104, 107, 114, 115, 118, 120, 123, 124, 125, 128, 131, 140, 143, 146, 147, 152, 159, 167, 168, 173, 179, 180, 182, 185, 186, 188, 193, 195, 205, 210

Offset

1,1

Links

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

Formula

A116610 = 1/2 { even terms in A160593 = A000720(A068231) } . - M. F. Hasler, May 22 2009

Example

26 is in the sequence because the 52nd prime is 239 and 239 mod 12=11.

Maple

a:=proc(n) if ithprime(2*n) mod 12 = 11 then n else fi end: seq(a(n), n=1..250);

Mathematica

Select[Range[250], Mod[Prime[2#], 12]==11&]  (* Harvey P. Dale, Jan 30 2011 *)

Prog

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

Crossrefs

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

Sequence in context: A092632 A213310 A055197 * A289698 A153041 A256471

Adjacent sequences: A116607 A116608 A116609 * A116611 A116612 A116613

Keyword

nonn

Author

Roger L. Bagula, Mar 29 2006

Extensions

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

Status

approved