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 A073347 #12 May 19 2022 09:14:17 %S A073347 1,5,14,28,46,69,97,130,168,211,259,311,368,430,497,569,646,728,815, %T A073347 907,1004,1105,1211,1322,1438,1559,1685,1816,1952,2093,2239,2390,2546, %U A073347 2706,2871,3041,3216,3396,3581,3771,3966,4166,4371,4581,4796,5016,5240,5469 %N A073347 a(1)=1; a(n+1) is the smallest integer > a(n) such that Sum_{k=a(n)..a(n+1)} 1/sqrt(k) > Pi. %H A073347 Amiram Eldar, <a href="/A073347/b073347.txt">Table of n, a(n) for n = 1..600</a> %F A073347 a(n) is asymptotic to Pi^2*n^2/4. %t A073347 a[1] = 1; a[n_] := a[n] = Module[{k = a[n - 1], s = 0}, While[(s += 1/Sqrt[k]) < Pi, k++]; k]; Array[a, 50] (* _Amiram Eldar_, May 19 2022 *) %Y A073347 Cf. A091476. %K A073347 easy,nonn %O A073347 1,2 %A A073347 _Benoit Cloitre_, Aug 23 2002 %E A073347 a(1) = 1 inserted by _Amiram Eldar_, May 19 2022