|
|
A122718
|
|
Convenience store primes or prime of the form abs(7^n - 2^11).
|
|
1
|
|
|
353, 1999, 14759, 115601, 40351559, 558545864083281959, 44567640326363195900190045974565959, 88124787089723195184393736687912818113309153, 10367793076318844190248738727596255138212949484401
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{c=2^11}, Select[Abs[7^Range[0, 100]-c], PrimeQ]]//Sort (* Harvey P. Dale, Aug 31 2017 *)
|
|
PROG
|
(PARI) g(n) = for(x=1, n, y=abs(7^x-2^11); if(ispseudoprime(y), print1(y", ")))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|