OFFSET
1,2
COMMENTS
No more terms through 10000.
EXAMPLE
floor(Pi^20 + e^20) = 9255121991 is prime, hence 20 is a term.
MATHEMATICA
$MaxExtraPrecision = 10^6; Do[k = Floor[Pi^n + E^n]; If[PrimeQ[k], Print[n]], {n, 1, 10000}]
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Ryan Propper, Oct 23 2005
STATUS
approved