
MATHEMATICA

Select[Table[Floor[\[Pi]^n+E^n], {n, 0, 5000}], PrimeQ] (* Harvey P. Dale, Apr 26 2011 *)


CROSSREFS

See also A059792 Numbers n such that floor(pi^n) is prime = {1, 3, 4, 12, 73, 317, 2728, 6826, 7683, 7950, 14417, ...} and their corresponding primes A077547 = {3, 31, 97, 924269, ...}. See also A059303 Floor(e^n)+1 is prime = {1, 5, 7, 10, 105, ...} and their corresponding primes.
Cf. A000040, A059303, A059792, A061675, A077547, A074496.
Sequence in context: A113617 A226069 A258429 * A269665 A080689 A026321
Adjacent sequences: A117836 A117837 A117838 * A117840 A117841 A117842
