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 A079047 #26 Jan 24 2023 07:49:41 %S A079047 1,2,6,11,25,33,54,64,90,136,151,207,250,269,314,393,470,501,590,655, %T A079047 684,789,863,976,1138,1226,1267,1353,1394,1493,1846,1944,2108,2156, %U A079047 2454,2511,2692,2877,3004,3201,3395,3470,3825,3901,4044,4118,4580,5058,5225 %N A079047 Number of primes between prime(n) and prime(n)^2. %C A079047 I conjecture that 25 and 64 are the only terms that are also square numbers. %C A079047 The next squares are 564001 and 774400, which occur at positions 419 and 481. There are no other squares in the first 10000 terms. - _T. D. Noe_, Sep 11 2013 %H A079047 T. D. Noe, <a href="/A079047/b079047.txt">Table of n, a(n) for n = 1..1000</a> %e A079047 a(1)=1 because between prime(1)=2 and 2^2=4 there's one prime (3). a(3)=6 because between prime(3)=5 and 5^2=25 there are 6 primes (7, 11, 13, 17, 19, 23). %t A079047 Table[p = Prime[n]; PrimePi[p^2] - n, {n, 100}] (* _T. D. Noe_, Sep 11 2013 *) %o A079047 (PARI) forprime(p=2,500,res=0; forprime(q=p+1,p^2,res=res+1); print1(res",")) %o A079047 (Magma) [#PrimesInInterval(NthPrime(n), NthPrime(n)^2)-1: n in [1..70]]; // _Vincenzo Librandi_, Jul 23 2019 %Y A079047 Cf. A055399, A066680. %Y A079047 Cf. A050216. %K A079047 nonn %O A079047 1,2 %A A079047 Jose R. Brox (tautocrona(AT)terra.es), Feb 01 2003 %E A079047 Data corrected by _T. D. Noe_, Oct 25 2006 %E A079047 Edited (removing comment & correction about irrelevant property) by _Peter Munn_, Jan 24 2023