cp's OEIS Frontend

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.

A064439 Numbers n such that sigma(n) - n - 1 = pi(n).

This page as a plain text file.
%I A064439 #20 Dec 15 2017 17:35:39
%S A064439 4,55,65,95,125,145,155,185,205,2779,2863,55297,174691,174779,487903,
%T A064439 1301989,1302457,5254751,6383483,23140961,48267437,59651051,70111213,
%U A064439 70111247,92514491,199445641,212210443,514269523,514269599,21881358361,1602278990111
%N A064439 Numbers n such that sigma(n) - n - 1 = pi(n).
%C A064439 a(32) > 3*10^12. - _Giovanni Resta_, Mar 31 2017
%t A064439 Select[Range[10^5], DivisorSigma[1, #] - # - 1 == PrimePi[#] &] (* _Giovanni Resta_, Mar 31 2017 *)
%o A064439 (PARI) sig(n) = sigma(n)-n-1; pi(x, c=0) = forprime(p=2,x,c++); c for(n=1,10^8, if(sig(n)==pi(n),print(n)))
%o A064439 (PARI) { n=0; for (m=1, 10^9, if ((sigma(m) - m - 1)==primepi(m), write("b064439.txt", n++, " ", m); if (n==100, break)) ) } \\ _Harry J. Smith_, Sep 14 2009
%Y A064439 Cf. A000720, A048050.
%K A064439 nonn
%O A064439 1,1
%A A064439 _Jason Earls_, Oct 01 2001
%E A064439 More terms from _Klaus Brockhaus_, Oct 05 2001. No further term < 800000.
%E A064439 a(16)-a(17) from _Harry J. Smith_, Sep 14 2009
%E A064439 a(18)-a(29) from _Donovan Johnson_, Feb 09 2013
%E A064439 a(30)-a(31) from _Giovanni Resta_, Mar 31 2017