login
Largest prime < n^5.
0

%I #4 Dec 08 2018 17:23:34

%S 31,241,1021,3121,7759,16787,32749,59029,99991,161047,248827,371291,

%T 537811,759371,1048573,1419839,1889561,2476081,3199997,4084081,

%U 5153623,6436327,7962607,9765619,11881357,14348891,17210353,20511143,24299981

%N Largest prime < n^5.

%t PrimePrev[n_]:=Module[{k},k=n-1;While[ !PrimeQ[k],k-- ];k];f[n_]:=n^5;lst={};Do[AppendTo[lst,PrimePrev[f[n]]],{n,5!}];lst

%t NextPrime[Range[2, 30]^5, -1] (* _Ray Chandler_, Dec 08 2018 *)

%Y Cf. A014220, A053001, A077037, A173831

%K nonn

%O 2,1

%A _Vladimir Joseph Stephan Orlovsky_, Feb 25 2010