A171969 Smallest prime greater than phi^n.

2, 3, 5, 7, 13, 19, 31, 47, 79, 127, 211, 331, 523, 853, 1367, 2207, 3581, 5779, 9371, 15131, 24481, 39607, 64081, 103687, 167771, 271451, 439217, 710663, 1149857, 1860503, 3010363, 4870861, 7881221, 12752053, 20633279

Offset

1,1

Links

Charles R Greathouse IV, Table of n, a(n) for n = 1..4784

M. Berg, Phi, the golden ratio (to 4599 decimal places) and Fibonacci numbers, Fibonacci Quarterly, 4 (1966), 157-162.

Example

The first prime > phi^6 = 17.94427... is 19, so a(6) = 19.

Mathematica

p[n_] := Module[{r, i}, r = 2; i = 1; While[r <= n, i = i + 1; r = Prime[i]];  r]; Table[p[GoldenRatio^n], {n, 1, 35}]
NextPrime[GoldenRatio^Range[40]] (* Harvey P. Dale, Dec 06 2013 *)

Prog

(PARI) a(n)=nextprime(((1+sqrt(5))/2)^n) \\ Charles R Greathouse IV, Jul 29 2011

Crossrefs

Cf. A001622, A104457.

Sequence in context: A217884 A101045 A114847 * A075580 A077132 A138184

Adjacent sequences: A171966 A171967 A171968 * A171970 A171971 A171972

Keyword

nonn

Author

Michel Lagneau, Nov 19 2010

Status

approved