A063766 a(n) is the smallest prime >= 6^n.

2, 7, 37, 223, 1297, 7789, 46663, 279941, 1679627, 10077721, 60466181, 362797091, 2176782371, 13060694051, 78364164101, 470184984667, 2821109907503, 16926659444771, 101559956668421, 609359740010513, 3656158440062987, 21936950640377863, 131621703842267239

Offset: 0

Author

Robert G. Wilson v, Aug 14 2001

Keywords

• nonn

Links

• Harry J. Smith, Table of n, a(n) for n = 0..200

Crossrefs

Cf. A000400, A007918.

Programs

Magma

[NextPrime(6^n): n in [0..25]];// Vincenzo Librandi, Jun 25 2018

Mathematica

NextPrime[ n_Integer ] := (k = n + 1; While[ !PrimeQ[ k ], k++ ]; k); Table[ NextPrime[ 6^n ], {n, 0, 22} ]
NextPrime[6^Range[0, 25]] (* Vincenzo Librandi, Jun 25 2018 *)

PARI

{ for (n=0, 200, write("b063766.txt", n, " ", nextprime(6^n)); ) } \\ Harry J. Smith, Aug 30 2009

Formula

a(n) = A007918(A000400(n)). - Michel Marcus, Jun 25 2018