OFFSET
1,2
PROG
(PARI) isok(n) = isprime(floor((Pi+exp(1))^n)); \\ Michel Marcus, Aug 28 2013
(PARI) is(n)=default(realprecision, n*log(Pi+exp(1))/log(10)\1+20); ispseudoprime((Pi+exp(1))^n\1) \\ Charles R Greathouse IV, Aug 28 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Dmitry Kamenetsky, Dec 28 2008
STATUS
approved