|
|
A172527
|
|
a(n) = the smallest prime > (1/EulerGamma)^n.
|
|
0
|
|
|
2, 5, 7, 11, 17, 29, 47, 83, 149, 251, 431, 733, 1277, 2203, 3803, 6599, 11411, 19777, 34253, 59333, 102793, 178067, 308489, 534431, 925891, 1604021, 2778901, 4814321, 8340593, 14449651, 25033357, 43369111, 75135077, 130168021, 225510203
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
EulerGamma is Euler's constant (or the Euler-Mascheroni constant) gamma (A001620).
1/EulerGamma = 1.7324547146006... (A098907).
|
|
LINKS
|
|
|
EXAMPLE
|
The first prime > (1/EulerGamma)^6 = 27.03779975... is 29, so a(6) = 29.
|
|
MATHEMATICA
|
Table[Prime[PrimePi[1/EulerGamma^n] + 1], {n, 1, 40}]
NextPrime/@Table[1/EulerGamma^n, {n, 40}] (* Harvey P. Dale, May 10 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|