|
|
A111191
|
|
Numbers n such that ceiling(Pi^n - e^n) is prime.
|
|
0
|
|
|
2, 3, 4, 17, 19, 44, 97, 105, 116, 207, 432, 872, 1203, 2139, 3212
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
No more terms through 10000.
|
|
LINKS
|
|
|
EXAMPLE
|
ceiling(Pi^17 - e^17) = 258689611 is prime, hence 17 is a term.
|
|
MATHEMATICA
|
$MaxExtraPrecision = 10^6; Do[k = Ceiling[Pi^n - E^n]; If[PrimeQ[k], Print[n]], {n, 1, 10000}]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,hard,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|