Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A158296
Primes p such that 12*p^2 -+ 1 are twin primes.
2
3, 11, 13, 17, 29, 227, 283, 491, 647, 739, 953, 1151, 1471, 1511, 1879, 1889, 2129, 2251, 2297, 2593, 2633, 3347, 3539, 3559, 3643, 3877, 3919, 4231, 4327, 4547, 4673, 4801, 4999, 5051, 6451, 6653, 6737, 6779, 6983, 7741, 7937, 8179, 8219, 8231, 8389
OFFSET
1,1
LINKS
EXAMPLE
3 is in the sequence since 12*3^2 = 108 and (107, 109) are twin primes.
MATHEMATICA
lst={}; Do[p=Prime[n]; a=12*p^2; If[PrimeQ[a-1]&&PrimeQ[a+1], AppendTo[lst, p]], {n, 7!}]; lst
Select[Prime[Range[1200]], AllTrue[12#^2+{1, -1}, PrimeQ]&] (* Harvey P. Dale, Sep 15 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved