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.

Showing 1-8 of 8 results.

A141548 Numbers n whose deficiency is 6.

Original entry on oeis.org

7, 15, 52, 315, 592, 1155, 2102272, 815634435
Offset: 1

Views

Author

Keywords

Comments

a(9) > 10^12. - Donovan Johnson, Dec 08 2011
a(9) > 10^13. - Giovanni Resta, Mar 29 2013
a(9) > 10^18. - Hiroaki Yamanouchi, Aug 21 2018
For all k in A059242, the number m = 2^(k-1)*(2^k+5) is in this sequence. This yields further terms 2^46*(2^47+5), 2^52*(2^53+5), 2^140*(2^141+5), ... All even terms known so far and the initial 7 = 2^0*(2^1+5) are of this form. All odd terms beyond a(2) are of the form a(n) = a(k)*p*q, k < n. We have proved that there is no further term of this form with the a(k) given so far. - M. F. Hasler, Apr 23 2015
A term n of this sequence multiplied by a prime p not dividing it is abundant if and only if p < sigma(n)/6 = n/3-1. For the even terms 592 and 2102272, there is such a prime near this limit (191 resp. 693571) such that n*p is a primitive weird number, cf. A002975. For a(3)=52, the largest such prime, 11, is already too small. Odd weird numbers do not exist within these limits. - M. F. Hasler, Jul 19 2016
Any term x of this sequence can be combined with any term y of A087167 to satisfy the property (sigma(x)+sigma(y))/(x+y) = 2, which is a necessary (but not sufficient) condition for two numbers to be amicable. - Timothy L. Tiffin, Sep 13 2016

Examples

			a(1) = 7, since 2*7 - sigma(7) = 14 - 8 = 6. - _Timothy L. Tiffin_, Sep 13 2016
		

Crossrefs

Cf. A087485 (odd terms).
Cf. A000203, A033880, A005100; A191363 (deficiency 2), A125246 (deficiency 4), A141548 (deficiency 6), A125247 (deficiency 8), A101223 (deficiency 10), A141549 (deficiency 12), A141550 (deficiency 14), A125248 (deficiency 16), A223608 (deficiency 18), A223607 (deficiency 20).
Cf. A087167 (abundance 6).

Programs

  • Magma
    [n: n in [1..9*10^6] | (SumOfDivisors(n)-2*n) eq -6]; // Vincenzo Librandi, Sep 14 2016
  • Mathematica
    lst={};Do[If[n==Plus@@Divisors[n]-n+6,AppendTo[lst,n]],{n,10^4}];Print[lst];
    Select[Range[1, 10^8], DivisorSigma[1, #] - 2 # == - 6 &] (* Vincenzo Librandi, Sep 14 2016 *)
  • PARI
    is(n)=sigma(n)==2*n-6 \\ Charles R Greathouse IV, Apr 23 2015, corrected by M. F. Hasler, Jul 18 2016
    

Extensions

a(8) from Donovan Johnson, Dec 08 2011

A274552 Numbers k such that sigma(k) == 0 (mod k-3).

Original entry on oeis.org

2, 4, 5, 6, 7, 8, 15, 52, 315, 592, 1155, 2102272, 815634435
Offset: 1

Views

Author

Paolo P. Lava, Jun 28 2016

Keywords

Examples

			sigma(4) mod (4-3) = 7 mod 1 = 0.
		

Crossrefs

Programs

  • Magma
    [n: n in [1..2*10^6] | n ne 3 and SumOfDivisors(n) mod (n-3) eq 0 ]; // Vincenzo Librandi, Jul 02 2016
    
  • Mathematica
    k = -3; Select[Range[1, 10^6], # + k != 0 && Mod[DivisorSigma[1, #], # + k] == 0 &] (* Michael De Vlieger, Jul 01 2016 *)
  • PARI
    is(n) = if(n == 3, return(0), Mod(sigma(n), n-3)==0) \\ Felix Fröhlich, Jul 02 2016

Extensions

a(12)-a(13) from Giovanni Resta
a(1)=2 inserted by Max Alekseyev, Jun 08 2025

A117346 Near-multiperfects: numbers m such that abs(sigma(m) mod m) <= log(m).

Original entry on oeis.org

1, 3, 4, 5, 6, 7, 8, 10, 11, 13, 16, 17, 19, 20, 23, 28, 29, 31, 32, 37, 41, 43, 47, 53, 59, 61, 64, 67, 70, 71, 73, 79, 83, 88, 89, 97, 101, 103, 104, 107, 109, 110, 113, 120, 127, 128, 131, 136, 137, 139, 149, 151, 152, 157, 163, 167, 173, 179, 181, 191, 193, 197, 199
Offset: 1

Views

Author

Walter Nissen, Mar 09 2006

Keywords

Comments

Sequences A117346 through A117350 are an attempt to improve on sequences A045768 through A045770, A077374, A087167, A087485 and A088007 through A088012 and related sequences (but not to replace them) by using a more significant definition of "near." E.g., is sigma(n) really "near" a multiple of n, for n=9? Or n=18? Sigma is the sum_of_divisors function.

Examples

			70 is in the sequence because sigma(70) = 144 = 2*70 + 4, while 4 < log(70) ~= 4.248.
		

References

  • R. K. Guy, Unsolved Problems in Number Theory, B2.

Crossrefs

Cf. A045768 through A045770, A077374, A087167, A087485, A088007 through A088012, A117347 through A117350.

Programs

  • Mathematica
    asmlQ[n_]:=Module[{p=Mod[DivisorSigma[1,n],n]},If[p>n/2,p=n-p];p<=Log[n]];
    Select[Range[200],asmlQ] (* Harvey P. Dale, Dec 25 2013 *)

Extensions

First term prepended by Harvey P. Dale, Dec 25 2013

A117349 Near-multiperfects with primes, powers of 2 and 6 * prime excluded, abs(sigma(n) mod n) <= log(n).

Original entry on oeis.org

6, 10, 20, 28, 70, 88, 104, 110, 120, 136, 152, 464, 496, 592, 650, 672, 884, 1155, 1888, 1952, 2144, 4030, 5830, 8128, 8384, 8925, 11096, 17816, 18632, 18904, 30240, 32128, 32445, 32760, 32896, 33664, 45356, 70564, 77744, 85936, 91388, 100804, 116624
Offset: 1

Views

Author

Walter Nissen, Mar 09 2006

Keywords

Comments

Sequences A117346 through A117350 are an attempt to improve on sequences A045768 through A045770, A077374, A087167, A087485 and A088007 through A088012 and related sequences (but not to replace them) by using a more significant definition of "near." E.g., is sigma(n) really "near" a multiple of n, for n=9? Or n=18? Log is the natural logarithm. Sigma is the sum_of_divisors function.

Examples

			70 is a term because sigma(70) = 144 = 2*70 + 4, while 4 < log(70) ~= 4.248.
		

References

  • R. K. Guy, Unsolved Problems in Number Theory, B2.

Crossrefs

Formula

sigma(n) = k*n + r, abs(r) <= log(n).

Extensions

Offset corrected by Donovan Johnson, Oct 01 2012

A117350 Near-multiperfects with primes, powers of 2, 6 * prime and 2^n * prime excluded, abs(sigma(n) mod n) <= log(n).

Original entry on oeis.org

70, 110, 120, 650, 672, 884, 1155, 4030, 5830, 8925, 11096, 17816, 18632, 18904, 30240, 32445, 32760, 45356, 70564, 77744, 85936, 91388, 100804, 116624, 244036, 254012, 388076, 391612, 430272, 442365, 523776, 1090912, 1848964, 2178540
Offset: 1

Views

Author

Walter Nissen, Mar 09 2006

Keywords

Comments

Sequences A117346 through A117350 are an attempt to improve on sequences A045768 through A045770, A077374, A087167, A087485 and A088007 through A088012 and related sequences (but not to replace them) by using a more significant definition of "near." E.g., is sigma (n) really "near" a multiple of n, for n=9? Or n=18? Sigma is the sum_of_divisors function.

Examples

			70 is in the sequence because sigma(70) = 144 = 2*70 + 4, while 4 < log(70) ~= 4.248.
The 2-perfect numbers are excluded because they are 2^n * prime.
		

References

  • R. K. Guy, Unsolved Problems in Number Theory, B2.

Crossrefs

Cf. A045768 through A045770, A077374, A087167, A087485, A088007 through A088012, A117346 through A117349.

Extensions

Offset corrected by Donovan Johnson, Oct 01 2012

A117347 Near-multiperfects with primes excluded, abs(sigma(m) mod m) <= log(m).

Original entry on oeis.org

4, 6, 8, 10, 16, 20, 28, 32, 64, 70, 88, 104, 110, 120, 128, 136, 152, 256, 464, 496, 512, 592, 650, 672, 884, 1024, 1155, 1888, 1952, 2048, 2144, 4030, 4096, 5830, 8128, 8192, 8384, 8925, 11096, 16384, 17816, 18632, 18904, 30240, 32128, 32445, 32760, 32768
Offset: 1

Views

Author

Walter Nissen, Mar 09 2006

Keywords

Comments

Sequences A117346 through A117350 are an attempt to improve on sequences A045768 through A045770, A077374, A087167, A087485 and A088007 through A088012 and related sequences (but not to replace them) by using a more significant definition of "near". E.g., is sigma(n) (where sigma is the sum-of-divisors function) really "near" a multiple of n, for n = 9? Or n = 18?

Examples

			70 is a term because sigma(70) = 144 = 2 * 70 + 4, while 4 < log(70) ~= 4.248.
		

References

  • R. K. Guy, Unsolved Problems in Number Theory, B2.

Crossrefs

Formula

sigma(m) = k * m + r, abs(r) <= log(m).

Extensions

Offset corrected by Amiram Eldar, Mar 05 2020

A117348 Near-multiperfects with primes and powers of 2 excluded, abs(sigma(m) mod m) <= log(m).

Original entry on oeis.org

6, 10, 20, 28, 70, 88, 104, 110, 120, 136, 152, 464, 496, 592, 650, 672, 884, 1155, 1888, 1952, 2144, 4030, 5830, 8128, 8384, 8925, 11096, 17816, 18632, 18904, 30240, 32128, 32445, 32760, 32896, 33664, 45356, 70564, 77744, 85936, 91388, 100804, 116624
Offset: 1

Views

Author

Walter Nissen, Mar 09 2006

Keywords

Comments

Sequences A117346 through A117350 are an attempt to improve on sequences A045768 through A045770, A077374, A087167, A087485 and A088007 through A088012 and related sequences (but not to replace them) by using a more significant definition of "near". E.g., is sigma(n) really "near" a multiple of n, for n = 9? Or n = 18? Sigma is the sum_of_divisors function.

Examples

			70 is a term because sigma(70) = 144 = 2 * 70 + 4, while 4 < log (70) ~= 4.248.
		

References

  • R. K. Guy, Unsolved Problems in Number Theory, B2.

Crossrefs

Formula

sigma(n) = k * n + r, abs(r) <= log(n).

Extensions

Offset corrected by Amiram Eldar, Mar 05 2020

A326138 Numbers k such that A005187(k) < sigma(k) <= 2k, where A005187(k) = 2k - {binary weight of k}.

Original entry on oeis.org

6, 28, 110, 496, 884, 8128, 18632, 85936, 116624, 391612, 15370304, 17619844, 33550336, 73995392, 815634435, 3915380170, 5556840416, 6800695312, 8589869056, 42783299288, 80999455688, 137438691328, 217898810368, 546409576448, 1081071376208, 1661355408388
Offset: 1

Views

Author

Antti Karttunen, Jun 13 2019

Keywords

Comments

Non-abundant numbers whose deficiency (A033879) is less than their binary weight (A000120).
No other terms below < 2^31.

Examples

			815634435 = 3*5*7*11*547*1291 is included as in base-2 (A007088) it is written as 110000100111011001100000000011_2, thus A000120(815634435) = 12, while its nonnegative deficiency (A033879) is 2*815634435 - sigma(815634435) = 6 < 12.
		

Crossrefs

Cf. A000120, A000203, A000396 (subsequence), A005187, A033879, A294898, A295296 (deficiency equals binary weight), A326131, A326132.
Intersection of A263837 and A326133.
Cf. also A087485, A141548, A188597.

Programs

Extensions

a(16)-a(26) from Giovanni Resta, Jun 16 2019
Showing 1-8 of 8 results.