|
|
A063768
|
|
Smallest prime >= 8^n.
|
|
0
|
|
|
2, 11, 67, 521, 4099, 32771, 262147, 2097169, 16777259, 134217757, 1073741827, 8589934609, 68719476767, 549755813911, 4398046511119, 35184372088891, 281474976710677, 2251799813685269, 18014398509482143, 144115188075855881
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
Table of n, a(n) for n=0..19.
|
|
MATHEMATICA
|
NextPrime[ n_Integer ] := (k = n + 1; While[ !PrimeQ[ k ], k++ ]; k); Table[ NextPrime[ 8^n ], {n, 0, 20} ]
NextPrime/@(8^Range[0, 20]) (* Harvey P. Dale, May 06 2013 *)
|
|
PROG
|
(PARI) g(n, b) = for(x=0, n, print1(nextprime(b^x)", ")) \\ Cino Hilliard, Mar 03 2005
|
|
CROSSREFS
|
Sequence in context: A138792 A058056 A266579 * A042245 A153298 A153393
Adjacent sequences: A063765 A063766 A063767 * A063769 A063770 A063771
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v, Aug 14 2001
|
|
EXTENSIONS
|
Edited by N. J. A. Sloane at the suggestion of Andrew S. Plewe, May 16 2007
|
|
STATUS
|
approved
|
|
|
|