login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A055707 Numbers n such that n | Sigma_13(n) - Phi(n)^13. 0
1, 2, 12, 34, 42, 90, 170, 198, 402, 434, 456, 482, 494, 2046, 4086, 4518, 7520, 7605, 8622, 9632, 10924, 28280, 51570, 51714, 74124, 77724, 100172, 139653, 143136, 176760, 294588, 399980, 471826, 675356, 690534, 1358360, 1577696, 2089074, 2121940, 2136256 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

sigma_13(n) is the sum of the 13th powers of the divisors of n (A013961).

LINKS

Table of n, a(n) for n=1..40.

MATHEMATICA

Do[If[Mod[DivisorSigma[13, n]-EulerPhi[n]^13, n]==0, Print[n]], {n, 1, 10^5}]

PROG

(PARI) isok(n) = !((sigma(n, 13) - eulerphi(n)^13) % n); \\ Michel Marcus, Mar 02 2014

CROSSREFS

Cf. A000010.

Sequence in context: A305330 A320542 A242709 * A055699 A244378 A309473

Adjacent sequences:  A055704 A055705 A055706 * A055708 A055709 A055710

KEYWORD

nonn

AUTHOR

Robert G. Wilson v, Jun 09 2000

EXTENSIONS

Definition corrected and more terms from Michel Marcus, Mar 02 2014

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified February 24 00:51 EST 2020. Contains 332195 sequences. (Running on oeis4.)