A173832 Largest prime < n^5.

31, 241, 1021, 3121, 7759, 16787, 32749, 59029, 99991, 161047, 248827, 371291, 537811, 759371, 1048573, 1419839, 1889561, 2476081, 3199997, 4084081, 5153623, 6436327, 7962607, 9765619, 11881357, 14348891, 17210353, 20511143, 24299981

Offset: 2

Author

Vladimir Joseph Stephan Orlovsky, Feb 25 2010

Keywords

• nonn

Crossrefs

Cf. A014220, A053001, A077037, A173831

Programs

Mathematica

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
NextPrime[Range[2, 30]^5, -1]  (* Ray Chandler, Dec 08 2018 *)