|
|
A099231
|
|
Numbers n such that n*((2^61-1)^4) - 1 and n*((2^61-1)^4) + 1 are twin primes.
|
|
2
|
|
|
53820, 60042, 84978, 101862, 110502, 178812, 181668, 222378, 245910, 266808, 275280, 310392, 353568, 353598, 354750, 373692, 477162, 491838, 498132
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{c=(2^61-1)^4}, Select[Range[500000], AllTrue[c*#+{1, -1}, PrimeQ]&]] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Aug 30 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|