A218408 -id:A218408 - cp's OEIS frontend

A218406 Numbers k for which sigma(k)/k - 1/5 is an integer.

5, 420, 7440, 8190, 18600, 121920, 131040, 95472000, 102136320, 197308800, 433305600, 503255040, 71271827200, 91967616000, 128848035840, 190066406400, 287879454720, 354560976000, 799959888000, 2061580369920, 2208930048000, 100368143884800, 341546502528000

Offset: 1

Zdenek Cervenka, Oct 28 2012

nonn

a(15) > 10^11. - Donovan Johnson, Oct 31 2012
a(20) > 10^12. - Giovanni Resta, Nov 04 2012
Note that there are no terms here with abundancy 11/5 (k=2). - Michel Marcus, Jun 26 2013

Cf. A218407, A218408, A218427.

a(8)-a(14) from Donovan Johnson, Oct 31 2012
a(15)-a(19) from Giovanni Resta, Nov 04 2012
More terms from Michel Marcus, Jun 26 2013

A218407 Numbers k for which sigma(k)/k - 2/5 is an integer.

Original entry on oeis.org

30, 140, 2480, 6200, 40640, 297600, 997920, 64995840, 167751680, 1502582400, 42949345280, 183196016640, 687193456640, 1447428787200, 63870637017600, 326676430080000, 20797363851264000, 24871926476966400, 42981218625945600, 404918548479244800

Offset: 1

Zdenek Cervenka, Oct 28 2012

nonn

a(12) > 10^11. - Donovan Johnson, Oct 31 2012
a(14) > 10^12. - Giovanni Resta, Nov 04 2012
Note that there are no terms here with abundancy 7/5 (k=1). - Michel Marcus, Jun 26 2013

Cf. A218406, A218408, A218427.

a(8)-a(11) from Donovan Johnson, Oct 31 2012
a(12)-a(13) from Giovanni Resta, Nov 04 2012
More terms from Michel Marcus, Jun 26 2013

A218427 Numbers k for which sigma(k)/k - 4/5 is an integer.

Original entry on oeis.org

10, 60, 1170, 114660, 72602880, 668304000, 714954240, 1307124000, 1381161600, 2701389600, 8052817920, 10181689600, 643773312000, 1330464844800, 2015156183040, 3522876144480, 15462510336000, 23885971200000, 702577007193600, 908714417345280

Offset: 1

Zdenek Cervenka, Oct 28 2012

nonn

a(13) > 10^11. - Donovan Johnson, Oct 31 2012

a(14) > 10^12. - Giovanni Resta, Nov 04 2012

M. Drennen, T. Gunter, P. Johnson and J. Ward, The Loneliest Number
Jeffrey Ward, Does Ten Have a Friend?, arXiv:0806.1001 [math.NT], 2008.

Cf. A218406, A218407, A218408.

a(5)-a(12) from Donovan Johnson, Oct 31 2012
a(13) from Giovanni Resta, Nov 04 2012
More terms from Michel Marcus, Jun 26 2013

A326200 Lexicographically earliest sequence such that a(i) = a(j) => sigma(i)/i = sigma(j)/j for all i, j.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 6, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90

Offset: 1

Antti Karttunen, Jun 13 2019

nonn

Restricted growth sequence transform of the abundancy index of n.
For all i, j:
  a(i) = a(j) <=> A094759(i) = A094759(j),
  a(i) = a(j) => A017665(i) = A017665(j),
  a(i) = a(j) => A017666(i) = A017666(j).

Antti Karttunen, Table of n, a(n) for n = 1..105664
Achim Flammenkamp, The Multiply Perfect Numbers Page

Cf. A000396 (positions of 6's), A005820 (positions of 119's).
Cf. A017665, A017666, A074902, A094759.
Cf. A218406, A218407, A218408, A218427, A326202.

up_to = 105664; \\ (In the same equivalence class as 78, 364 and 6448).
rgs_transform(invec) = { my(om = Map(), outvec = vector(length(invec)), u=1); for(i=1, length(invec), if(mapisdefined(om,invec[i]), my(pp = mapget(om, invec[i])); outvec[i] = outvec[pp] , mapput(om,invec[i],i); outvec[i] = u; u++ )); outvec; };
v326200 = rgs_transform(vector(up_to,n,sigma(n)/n));
A326200(n) = v326200[n];

cp's OEIS Frontend

A218406 Numbers k for which sigma(k)/k - 1/5 is an integer.

Views

Author

Keywords

Comments

Crossrefs

Extensions

A218407 Numbers k for which sigma(k)/k - 2/5 is an integer.

Views

Author

Keywords

Comments

Crossrefs

Extensions

A218427 Numbers k for which sigma(k)/k - 4/5 is an integer.

Views

Author

Keywords

Comments

Links

Crossrefs

Extensions

A326200 Lexicographically earliest sequence such that a(i) = a(j) => sigma(i)/i = sigma(j)/j for all i, j.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI