login
Numbers k such that floor(Pi^k + e^k) is prime.
0

%I #11 Apr 11 2021 06:40:25

%S 1,2,20,21,3087,3284

%N Numbers k such that floor(Pi^k + e^k) is prime.

%C No more terms through 10000.

%e floor(Pi^20 + e^20) = 9255121991 is prime, hence 20 is a term.

%t $MaxExtraPrecision = 10^6; Do[k = Floor[Pi^n + E^n]; If[PrimeQ[k], Print[n]], {n, 1, 10000}]

%Y Cf. A061675.

%K nonn,hard,more

%O 1,2

%A _Ryan Propper_, Oct 23 2005