A172527 a(n) = the smallest prime > (1/EulerGamma)^n.

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

Offset: 1

Author

Michel Lagneau, Nov 21 2010

Keywords

• nonn

Comments

EulerGamma is Euler's constant (or the Euler-Mascheroni constant) gamma (A001620).

1/EulerGamma = 1.7324547146006... (A098907).

Examples

			The first prime > (1/EulerGamma)^6 = 27.03779975... is 29, so a(6) = 29.
		

Crossrefs

Cf. A001620 A098907.

Programs

Mathematica

Table[Prime[PrimePi[1/EulerGamma^n] + 1], {n, 1, 40}]
NextPrime/@Table[1/EulerGamma^n,{n,40}] (* Harvey P. Dale, May 10 2020 *)