|
|
A104080
|
|
Smallest prime >= 2^n.
|
|
18
|
|
|
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;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
FORMULA
|
Sum_{n >= 0) 1/a(n) = A338475 + 1/6 = 1.4070738... (because 1/6 = 1/2 - 1/3). - Bernard Schott, Nov 01 2020
|
|
MATHEMATICA
|
Join[{2, 2}, NextPrime[#]&/@(2^Range[2, 40])] (* Harvey P. Dale, Jan 26 2011 *)
|
|
PROG
|
(PARI) g(n, b=2) = for(x=0, n, print1(nextprime(b^x)", "))
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|