A120460 Primes p such that (3*p^2+1)/4 is prime.
3, 5, 7, 13, 19, 23, 29, 47, 61, 83, 97, 127, 149, 163, 173, 181, 191, 211, 239, 251, 257, 281, 307, 313, 317, 331, 359, 373, 383, 419, 433, 439, 449, 467, 491, 503, 593, 607, 617, 631, 643, 701, 709, 719, 751, 797, 811, 839, 859, 883, 887, 937, 971, 1013, 1049
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A121259.
Programs
-
Mathematica
Select[Prime[Range[200]],PrimeQ[(3#^2+1)/4]&] (* Harvey P. Dale, Apr 25 2017 *)
Comments