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!)
A066155 Numbers k such that EulerPhi(k) = sigma(k+1) - sigma(k-1). 1
4, 6, 11, 32, 38, 54, 84, 278, 407, 804, 1854, 2664, 3287, 6579, 11327, 14750, 15608, 20720, 41664, 46839, 70190, 73283, 80429, 185231, 241614, 275876, 355292, 375200, 410327, 511220, 692909, 763179, 901494, 920390, 1089984, 1099196, 1356759 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Harry J. Smith, Table of n, a(n) for n = 1..70

EXAMPLE

EulerPhi(6) = 2 = 8 - 6 = sigma(7) - sigma(5).

MATHEMATICA

Select [Range[1, 10^6], EulerPhi[ # ] == DivisorSigma[1, # + 1] - DivisorSigma[1, # - 1] & ]

PROG

(PARI) { n=0; for (m=2, 10^9, if (eulerphi(m) == sigma(m + 1) - sigma(m - 1), write("b066155.txt", n++, " ", m); if (n==100, return)) ) } \\ Harry J. Smith, Feb 03 2010

CROSSREFS

Sequence in context: A330459 A285994 A290651 * A105308 A116983 A196271

Adjacent sequences:  A066152 A066153 A066154 * A066156 A066157 A066158

KEYWORD

nonn

AUTHOR

Joseph L. Pe, Dec 13 2001

EXTENSIONS

a(35)-a(37) from Harry J. Smith, Feb 03 2010

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 October 23 00:24 EDT 2020. Contains 337962 sequences. (Running on oeis4.)