login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A333338 Numbers k such that sigma_2(k) = sigma_2(phi(k)). 0
1, 7, 11891, 130801, 273493, 1438811, 3008423, 6290339, 15826921, 33092653, 69193729, 144677797, 174096131, 364019183, 761131019, 1591455767, 1915057441, 3327589331, 4004211013, 8372441209, 17506013437, 21065631851, 36603482641, 44046321143, 76534554613, 92096853299 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
The sequence is infinite since it contains all the numbers of the form 11^i*23^j*47 for i,j > 0. Up to 10^11 the only terms not of this form are 1 and 7. - Giovanni Resta, Mar 15 2020
LINKS
EXAMPLE
50 = 1^2 + 7^2 (sum of the squares of the divisors of 7) = 1^2 + 2^2 + 3^2 + 6^2 (sum of the squares of the divisors of 6 = phi(7)). So 7 is in the sequence.
MATHEMATICA
Select[Range[10!], DivisorSigma[2, #]==DivisorSigma[2, EulerPhi[#]]&]
PROG
(PARI) isok(m) = sigma(m, 2) == sigma(eulerphi(m), 2); \\ Michel Marcus, Mar 15 2020
CROSSREFS
Sequence in context: A152007 A350148 A242773 * A131676 A344532 A280813
KEYWORD
nonn
AUTHOR
Ivan N. Ianakiev, Mar 14 2020
EXTENSIONS
More terms from Giovanni Resta, Mar 15 2020
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 18 08:27 EDT 2024. Contains 371769 sequences. (Running on oeis4.)