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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A074887 Numbers n such that sigma(n - phi(n)) = phi(n + phi(n)). 0
 915, 12957, 20745, 26985, 54621, 97785, 111615, 188013, 191775, 197631, 231045, 258687, 428745, 565761, 726645, 793653, 807639, 829857, 941451, 1048719, 1084587, 1224111, 1233027, 1863255, 1920681, 1973805, 2043489, 2129883, 2254119, 2265417, 2300151 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Table of n, a(n) for n=1..31. EXAMPLE sigma(915-phi(915)) = sigma(915-480) = 720; phi(915+phi(915)) = phi(1395) = 720, so 915 is a term of the sequence. MATHEMATICA r = {}; Do[e = EulerPhi[n]; If[DivisorSigma[1, n - e] == EulerPhi[n + e], r = Append[r, n]], {n, 1, 10^5}]; r Select[Range[3000000], DivisorSigma[1, #-EulerPhi[#]]==EulerPhi[#+ EulerPhi[ #]]&] (* Harvey P. Dale, Sep 03 2013 *) CROSSREFS Sequence in context: A189182 A365514 A252427 * A234993 A234764 A282592 Adjacent sequences: A074884 A074885 A074886 * A074888 A074889 A074890 KEYWORD nonn AUTHOR Joseph L. Pe, Sep 13 2002 EXTENSIONS More terms from Harvey P. Dale, Sep 03 2013 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.

Last modified August 10 09:30 EDT 2024. Contains 375044 sequences. (Running on oeis4.)