A125248 Numbers n whose abundance sigma(n)-2n = -16. Numbers n whose deficiency is 16.
17, 38, 92, 170, 248, 752, 988, 2528, 8648, 12008, 34688, 63248, 117808, 526688, 531968, 820808, 1292768, 1495688, 2095208, 2112512, 3477608, 4495808, 8419328, 12026888, 13192768, 16102808, 26347688, 29322008, 33653888, 169371008
Offset: 1
Examples
The abundance of 38 = (1+2+19+38)-76 = -16
Links
- Donovan Johnson, Giovanni Resta and Hiroaki Yamanouchi, Table of n, a(n) for n = 1..69 (terms <= 10^18, first 43 terms from _Donovan Johnson_ and a(44)-a(51) from _Giovanni Resta_)
Crossrefs
Programs
-
Magma
[n: n in [1..9*10^6] | (SumOfDivisors(n)-2*n) eq -16]; // Vincenzo Librandi, Sep 14 2016
-
Mathematica
Select[Range[1, 10^6], DivisorSigma[1, #] - 2 # == - 16 &] (* Vincenzo Librandi, Sep 14 2016 *)
-
PARI
for(n=1,1000000,if(((sigma(n)-2*n)==-16),print1(n,",")))
Extensions
a(17) to a(30) from Klaus Brockhaus, Nov 29 2006
Comments