|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
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
|
|
|
|