|
| |
|
|
A104080
|
|
Smallest prime >= 2^n.
|
|
6
| |
|
|
2, 2, 5, 11, 17, 37, 67, 131, 257, 521, 1031, 2053, 4099, 8209, 16411, 32771, 65537, 131101, 262147, 524309, 1048583, 2097169, 4194319, 8388617, 16777259, 33554467, 67108879, 134217757, 268435459, 536870923, 1073741827, 2147483659
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
FORMULA
| a(n)=A014210(n), n <> 1. [From R. J. Mathar (mathar(AT)strw.leidenuniv.nl), Oct 14 2008]
|
|
|
MATHEMATICA
| Join[{2, 2}, NextPrime[#]&/@(2^Range[2, 40])] [From Harvey P. Dale, Jan 26 2011]
NextPrime[2^Range[0, 50]-1] (* From Vladimir Joseph Stephan Orlovsky, Apr 11 2011 *)
|
|
|
PROG
| (PARI) g(n, b) = for(x=0, n, print1(nextprime(b^x)", "))
|
|
|
CROSSREFS
| Cf. A104081.
Sequence in context: A081374 A117400 A005637 * A078405 A109278 A112527
Adjacent sequences: A104077 A104078 A104079 * A104081 A104082 A104083
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Cino Hilliard (hillcino368(AT)gmail.com), Mar 03 2005
|
| |
|
|
