%I A111937
%S A111937 5,29,88,948,1071,1100,1578,14357
%N A111937 Integers n such that ceiling(pi^n) is prime.
%H A111937 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               Phi-Prime.html">Phi-Prime</a>
%e A111937 a(1)=5: ceiling(3.1415926535897932384626433832795^5) = ceiling(306.01968478528145326274131004344) 
               = 307, which is prime.
%t A111937 $MaxExtraPrecision = 2^20; Do[ If[ PrimeQ[ Ceiling[Pi^n]], Print[n]], 
               {n, 10000}] (* Robert G. Wilson v *)
%Y A111937 Sequence in context: A087348 A154412 A050409 this_sequence A139856 A097345 
               A097344
%Y A111937 Adjacent sequences: A111934 A111935 A111936 this_sequence A111938 A111939 
               A111940
%K A111937 nonn
%O A111937 1,1
%A A111937 Ray G. Opao (1260(AT)email.com), Nov 27 2005
%E A111937 a(5)-a(7) from Robert G. Wilson v (rgwv(at)rgwv.com), Nov 28 2005
%E A111937 a(8) from Donovan Johnson (donovan.johnson(AT)yahoo.com), Feb 04 2008