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,1

Links

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

Formula

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

Example

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

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 *)

Prog

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

Crossrefs

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

Sequence in context: A098991 A314657 A314658 * A314659 A314660 A227118

Adjacent sequences: A116613 A116614 A116615 * A116617 A116618 A116619

Keyword

nonn

Author

Roger L. Bagula, Mar 29 2006

Extensions

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

Status

approved