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 A063846 #17 Jun 25 2018 03:42:21 %S A063846 1440,1800,2160,2880,3024,3600,4320,5040,5400,5760,6048,6480,7056, %T A063846 7200,7560,7920,8064,8640,9000,9072,9360,9504,9720,10080,10584,10800, %U A063846 11088,11520,11880,12096,12240,12600,12960,13680,14040,14112,14400,15120 %N A063846 Numbers k such that sigma(k) - usigma(k) > 2k. %H A063846 Giovanni Resta, <a href="/A063846/b063846.txt">Table of n, a(n) for n = 1..10000</a> (first 1000 terms from Harry J. Smith) %o A063846 (PARI) u(n) = sumdiv(n,d, if(gcd(d,n/d)==1,d)); %o A063846 j=[]; for(n=1,20000, if(sigma(n)-u(n)>2*n,j=concat(j,n))); j %o A063846 (PARI) u(n) = sumdiv(n, d, if(gcd(d, n/d)==1, d)) %o A063846 { n=0; for (m=1, 10^9, if(sigma(m) - u(m) > 2*m, write("b063846.txt", n++, " ", m); if (n==1000, break)) ) } \\ _Harry J. Smith_, Sep 01 2009 %Y A063846 Cf. A034448, A048146, A034683, A064597. %K A063846 easy,nonn %O A063846 1,1 %A A063846 _Jason Earls_, Aug 25 2001