login
A116610
Values of n such that prime(2*n) mod 12 = 11.
8
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
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
KEYWORD
nonn
AUTHOR
Roger L. Bagula, Mar 29 2006
EXTENSIONS
Edited by N. J. A. Sloane, Apr 05 2006
STATUS
approved