This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A171969 #21 Jan 05 2025 19:51:39
%S A171969 2,3,5,7,13,19,31,47,79,127,211,331,523,853,1367,2207,3581,5779,9371,
%T A171969 15131,24481,39607,64081,103687,167771,271451,439217,710663,1149857,
%U A171969 1860503,3010363,4870861,7881221,12752053,20633279
%N A171969 Smallest prime greater than phi^n.
%H A171969 Charles R Greathouse IV, <a href="/A171969/b171969.txt">Table of n, a(n) for n = 1..4784</a>
%H A171969 M. Berg, <a href="https://web.archive.org/web/2024*/https://www.fq.math.ca/Scanned/4-2/berg.pdf">Phi, the golden ratio (to 4599 decimal places) and Fibonacci numbers</a>, Fibonacci Quarterly, 4 (1966), 157-162.
%e A171969 The first prime > phi^6 = 17.94427... is 19, so a(6) = 19.
%t A171969 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}]
%t A171969 NextPrime[GoldenRatio^Range[40]] (* _Harvey P. Dale_, Dec 06 2013 *)
%o A171969 (PARI) a(n)=nextprime(((1+sqrt(5))/2)^n) \\ _Charles R Greathouse IV_, Jul 29 2011
%Y A171969 Cf. A001622, A104457.
%K A171969 nonn
%O A171969 1,1
%A A171969 _Michel Lagneau_, Nov 19 2010