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!)
A066154 Numbers k such that EulerPhi(k) = sigma(k) - sigma(k-1). 1

%I #9 Jun 16 2018 16:05:12

%S 574,3496,148708,380276,604504,703402,1223194,1961218,2375854,5153085,

%T 13182476,15089116,15624820,18503524,19402515,22352968,27366118,

%U 41377798,42917332,51062116,58911736,60113914,74657636,75018856

%N Numbers k such that EulerPhi(k) = sigma(k) - sigma(k-1).

%H Harry J. Smith, <a href="/A066154/b066154.txt">Table of n, a(n) for n = 1..29</a>

%e EulerPhi(574) = 240 = 1008 - 768 = sigma(574) - sigma(573).

%t Select [Range[1, 10^7], EulerPhi[ # ] == DivisorSigma[1, # ] - DivisorSigma[1, # - 1] & ]

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

%K nonn

%O 1,1

%A _Joseph L. Pe_, Dec 13 2001

%E a(11)-a(24) from _Harry J. Smith_, Feb 03 2010

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 March 29 03:41 EDT 2024. Contains 371264 sequences. (Running on oeis4.)