|
|
A195137
|
|
Primes of the form abs(2^n - prime(n)^2).
|
|
0
|
|
|
2, 5, 17, 89, 1087, 30559, 127591, 8381719, 134207119, 140737488310807, 3450873173395281893717377931138512726225554486085193277581262109788439
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
Union[Select[Table[Abs[2^n-Prime[n]^2], {n, 500}], PrimeQ]] (* Harvey P. Dale, Jun 01 2014 *)
|
|
PROG
|
(PARI) print1("2, 5, 17, 89"); n=10; forprime(p=31, 1e4, if(isprime(t=abs(2^n++-p^2)), print1(", "t))) \\ Charles R Greathouse IV, Sep 11 2011
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|