A057605 Nonnegative n such that 4*n^2 + 163 is prime.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 22, 24, 25, 27, 28, 29, 31, 32, 33, 34, 36, 37, 38, 39, 40, 42, 43, 44, 45, 46, 47, 49, 50, 51, 52, 53, 54, 55, 57, 58, 59, 60, 64, 67, 69, 70, 71, 72, 74, 77, 78, 79, 80, 81, 82, 84, 85, 88, 89, 90, 91, 92

Offset: 1

Author

N. J. A. Sloane, Oct 08 2000

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..2000

Crossrefs

Cf. A057604.

Programs

Magma

[n: n in [0..100] | IsPrime( 4*n^2 + 163 )]; // Vincenzo Librandi, Aug 15 2014

Maple

a := []; for n from 0 to 500 do if isprime(4*n^2+163) then a := [op(a), n]; fi; od: a;

Mathematica

Select[Range[0,100],PrimeQ[4#^2+163]&] (* Harvey P. Dale, Aug 14 2014 *)

Extensions

More terms from James R. Buddenhagen, Mar 03 2001