A113542 Numbers k such that (18*k^2+1)/19 is prime.

18, 20, 37, 56, 58, 96, 113, 134, 151, 172, 227, 229, 246, 265, 267, 286, 305, 322, 341, 362, 398, 400, 474, 476, 493, 495, 590, 609, 626, 645, 647, 664, 683, 685, 740, 780, 799, 835, 894, 911, 932, 968, 970, 987, 1008, 1025, 1027, 1044, 1046, 1063, 1141

Offset

1,1

Links

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

Mathematica

s={}; Do[If[PrimeQ[(18n^2+1)/19], AppendTo[s, n]], {n, 2000}]; s

Prog

(PARI) is(n)=isprime((18*n^2+1)/19) \\ Charles R Greathouse IV, Jun 13 2017

Crossrefs

Sequence in context: A064271 A113541 A181453 * A075865 A250113 A182226

Adjacent sequences: A113539 A113540 A113541 * A113543 A113544 A113545

Keyword

nonn,easy

Author

Zak Seidov, Jan 13 2006

Status

approved