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-2 of 2 results.

A349755 Numbers k for which the 3-adic valuations of k and sigma(k) are equal, and that also satisfy Euler's criterion for odd perfect numbers (see A228058).

Original entry on oeis.org

153, 325, 801, 925, 1525, 1573, 1773, 1825, 2097, 2205, 2425, 2725, 3757, 3825, 3925, 4041, 4477, 4525, 4689, 4825, 5013, 5725, 6025, 6877, 6925, 6957, 7381, 7605, 7825, 7929, 8125, 8425, 8577, 8725, 8833, 9325, 9549, 9873, 9925, 10225, 10525, 10693, 10825, 10933, 11425, 11493, 11737, 12789, 13189, 13437, 13525
Offset: 1

Views

Author

Antti Karttunen, Dec 02 2021

Keywords

Comments

Obviously, all odd perfect numbers x, if such numbers exist at all, have to satisfy not only the famous condition given by Euler (see A228058), but also valuation(sigma(x), p) = valuation(x, p) for all odd primes p = 3, 5, 7, 11, etc. See also comments in A349752.
a(109), a(283), a(440) = 31213, 88837, 146461, are the first terms not occurring in A387162. - Antti Karttunen, Aug 27 2025

Crossrefs

Intersection of A228058 and A349749.
Cf. A387162 (subsequence).

Programs

  • PARI
    isA228058(n) = if(!(n%2)||(omega(n)<2), 0, my(f=factor(n), y=0); for(i=1, #f~, if(1==(f[i, 2]%4), if((1==y)||(1!=(f[i, 1]%4)), return(0), y=1), if(f[i, 2]%2, return(0)))); (y));
    isA349755(n) = (isA228058(n)&&valuation(sigma(n), 3)==valuation(n, 3));

A386429 Odd composites k such that A342926(k) is even and A342926(2*k) is a multiple of 3 and which satisfy Euler's condition for odd perfect numbers (A228058).

Original entry on oeis.org

45, 153, 261, 325, 369, 405, 477, 801, 909, 925, 1017, 1233, 1341, 1377, 1525, 1557, 1573, 1773, 1825, 2097, 2205, 2313, 2349, 2421, 2425, 2529, 2637, 2725, 2853, 3177, 3321, 3501, 3609, 3645, 3757, 3825, 3925, 4041, 4149, 4293, 4477, 4525, 4581, 4689, 4825, 5013, 5121, 5337, 5445, 5553, 5725, 5733, 5769, 5877, 6025
Offset: 1

Views

Author

Antti Karttunen, Aug 18 2025

Keywords

Comments

Sequence contains also some terms of A386428: 28125, 253125, 1378125, 2278125, 3341637, 3403125, 4753125, etc.

Crossrefs

Intersection of A228058 and A347874.
Conjectured to be also the intersection of A228058 and A349751.
Setwise difference A228058 \ A351574.
Cf. also A349755, A387162.

Programs

  • PARI
    A003415(n) = if(n<=1, 0, my(f=factor(n)); n*sum(i=1, #f~, f[i, 2]/f[i, 1]));
    A342926(n) = (A003415(sigma(n))-n);
    isA228058(n) = if(!(n%2)||(omega(n)<2), 0, my(f=factor(n), y=0); for(i=1, #f~, if(1==(f[i, 2]%4), if((1==y)||(1!=(f[i, 1]%4)), return(0), y=1), if(f[i, 2]%2, return(0)))); (y));
    isA347874(n) = ((n%2)&&!isprime(n)&&!(A342926(n)%2)&&!(A342926(2*n)%3));
    isA386429(n) = (isA228058(n) && isA347874(n));
Showing 1-2 of 2 results.