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!)
A246803 Solutions of phi(sigma(x)) = x-phi(x). 1
6, 10, 14, 20, 22, 24, 34, 40, 44, 46, 56, 62, 68, 88, 92, 94, 106, 136, 142, 152, 164, 184, 188, 212, 214, 232, 248, 254, 284, 332, 376, 382, 384, 424, 428, 464, 472, 568, 632, 640, 668, 712, 764, 766, 856, 862, 864, 896, 944, 1004, 1016, 1172, 1192, 1294, 1408, 1424, 1432 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

For n>1, 2*A005105(n) is in the sequence.

So is 8*A005105(n).  4*A005105(n) is in the sequence if A005105(n) == 5 mod 6 (i.e. is not 2 or in A000668). - Robert Israel, Oct 01 2014

LINKS

Jens Kruse Andersen, Table of n, a(n) for n = 1..1000

EXAMPLE

20 is in the sequence since phi(sigma(20)) = phi(42) = 12 = 20-phi(20).

MAPLE

with(numtheory): A246803:=n->`if`(phi(sigma(n)) = n-phi(n), n, NULL): seq(A246803(n), n=1..2000); # Wesley Ivan Hurt, Sep 30 2014

MATHEMATICA

Select[Range[1500], EulerPhi[DivisorSigma[1, #]]==#-EulerPhi[#]&]

CROSSREFS

Cf. A000010, A000203, A005105.

Sequence in context: A315197 A315198 A006617 * A140695 A085681 A315199

Adjacent sequences:  A246800 A246801 A246802 * A246804 A246805 A246806

KEYWORD

nonn

AUTHOR

Jahangeer Kholdi, Sep 28 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 May 9 23:39 EDT 2021. Contains 343746 sequences. (Running on oeis4.)