A151953 Primes of the form 6*n^2+17.

17, 23, 41, 71, 113, 167, 233, 311, 401, 503, 617, 743, 881, 1031, 1193, 1367, 1553, 2417, 2663, 3191, 3767, 4073, 4391, 4721, 5417, 5783, 6551, 7793, 8231, 8681, 10103, 10601, 11633, 12713, 13841, 14423, 15017, 16871, 20201, 20903, 21617, 22343

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

select(isprime, [seq(6*n^2+17, n=0..1000)]); # Robert Israel, Feb 06 2018

Mathematica

f[a_]:=6*a^2+17; lst={}; Do[If[PrimeQ[f[n]], AppendTo[lst, f[n]]], {n, 0, 4!}]; lst

Crossrefs

Cf. A139843, A128829.

Sequence in context: A243137 A256397 A139843 * A102874 A086532 A159044

Adjacent sequences: A151950 A151951 A151952 * A151954 A151955 A151956

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Jul 14 2009

Status

approved