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 A161187 #20 Oct 13 2024 02:59:40
%S A161187 1,4,7,10,14,17,22,26,31,35,41,46,52,58,63,70,78,84,91,98,106,114,122,
%T A161187 129,139,148,156,165,175,184,193,204,214,225,235,246,256,266,279,291,
%U A161187 304,316,326,339,351,365,376,390,406,417,429,445,462,475,489,501,514
%N A161187 Let S = A089237\{0} = union of primes and nonzero squares; sequence gives indices of squares.
%H A161187 Reinhard Zumkeller, <a href="/A161187/b161187.txt">Table of n, a(n) for n = 1..1000</a>
%F A161187 A089237(a(n)+1) = A000290(n). - _Reinhard Zumkeller_, Dec 18 2012
%t A161187 Table[PrimePi[n^2 - 1] + n, {n, 60}] (* _Vincenzo Librandi_, Feb 18 2016 *)
%o A161187 (Haskell)
%o A161187 a161187 n = a161187_list !! (n-1)
%o A161187 a161187_list = tail $ findIndices ((== 1) . a010052) a089237_list
%o A161187 -- _Reinhard Zumkeller_, Dec 18 2012
%o A161187 (Magma) [1] cat [#PrimesUpTo(n^2-1)+n: n in [2..100]]; // _Vincenzo Librandi_, Feb 18 2016
%o A161187 (Python)
%o A161187 from sympy import primepi
%o A161187 def A161187(n): return n+primepi(n**2) # _Chai Wah Wu_, Oct 12 2024
%Y A161187 Cf. A089237. Complement of A161188.
%Y A161187 Cf. A050052.
%K A161187 easy,nonn
%O A161187 1,2
%A A161187 _Daniel Tisdale_, Jun 06 2009
%E A161187 Edited by _N. J. A. Sloane_, Jun 07 2009
%E A161187 Extended by _Ray Chandler_, May 06 2010