login
Smallest prime >= 5^n.
1

%I #7 Feb 23 2016 18:42:33

%S 2,5,29,127,631,3137,15629,78137,390647,1953151,9765629,48828139,

%T 244140683,1220703131,6103515637,30517578167,152587890649,

%U 762939453127,3814697265637,19073486328181,95367431640673,476837158203149

%N Smallest prime >= 5^n.

%F a(n)=A054321(n), n>1. [From _R. J. Mathar_, Dec 13 2008]

%t Join[{2,5},NextPrime[5^Range[2,30]]] (* _Harvey P. Dale_, Feb 23 2016 *)

%o (PARI) g(n,b) = for(x=0,n,print1(nextprime(b^x)","))

%K easy,nonn

%O 0,1

%A _Cino Hilliard_, Mar 03 2005