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,1

Links

Table of n, a(n) for n=2..30.

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 *)

Crossrefs

Cf. A014220, A053001, A077037, A173831

Sequence in context: A140846 A082544 A372961 * A272162 A338893 A189923

Adjacent sequences: A173829 A173830 A173831 * A173833 A173834 A173835

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Feb 25 2010

Status

approved