A171883 Mills primes, starting with 3.
3, 29, 24391, 14510715208481, 3055388613462301256452407743005777548691
Offset: 1
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..7
- Robert Munafo, Mills primes, starting with 3
Crossrefs
Cf. A051254
Programs
-
Mathematica
p = 36/25; Table[p = NextPrime[p^3], {6}] (* From Alonso del Arte based on T. D. Noe's program for A051254, Oct 05 2011 *) NestList[NextPrime[#^3]&,3,5] (* Harvey P. Dale, Feb 15 2014 *)
-
Maxima
n:3 $ l:10^100 $ print(n) $ while (n
Extensions
Offset corrected by Arkadiusz Wesolowski, Oct 05 2011
Comments