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 A074195 #13 Dec 15 2017 17:36:01 %S A074195 4,20,1278,1339,11074308238,19096347067 %N A074195 Sum of the primes from smallest prime factor of n to the largest prime factor of n = largest difference between consecutive divisors of n (ordered by size). %C A074195 10^11 < a(7) <= 8912510129422438. - _Giovanni Resta_, May 13 2016 %t A074195 Select[Range[2, 2000], (p = First /@ FactorInteger[#]; #-#/p[[1]] == Sum[ Prime[i], {i, PrimePi@ p[[1]], PrimePi@ p[[-1]]}]) &] (* _Giovanni Resta_, May 13 2016 *) %o A074195 (PARI) isok(n) = {pf = factor(n)[,1]; my(pmin = vecmin(pf)); s = 0; forprime(p = pmin, vecmax(pf), s += p); s == n - n/pmin;} \\ _Michel Marcus_, Feb 03 2014 %Y A074195 Cf. A060681, A074036, A055233, A055514. %K A074195 more,nonn %O A074195 1,1 %A A074195 _Jason Earls_, Sep 19 2002 %E A074195 a(5)-a(6) from _Giovanni Resta_, May 13 2016