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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A179189 Numbers n such that phi(n) = phi(n+7), with Euler's totient function phi = A000010. 7
 5, 7, 21, 45, 75, 105, 285, 488, 585, 765, 1148, 1275, 1358, 1785, 2528, 3465, 4088, 6825, 9405, 12375, 14348, 15345, 16208, 16988, 23648, 25905, 25935, 42698, 50018, 52845, 54615, 61448, 62865, 68445, 78195, 80025, 82005, 88328, 93555, 98475 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 COMMENTS There are 40 terms below 10^5, 81 terms below 10^6 and 162 terms below 10^7.  There are 6606 terms below 10^12. [Jud McCranie, Feb 13 2012] Farideh Firoozbakht asks whether there is some a(n+1) = a(n)+7, cf. link. For n < 10^13, the only n such that phi(n-7) = phi(n) = phi(n+7) is 30057431145. - Giovanni Resta, Feb 27 2014 LINKS Jud McCranie, Table of n, a(n) for n = 1..6606 (terms < 10^12) F. Firoozbakht, Puzzle 466. phi(n-1)=phi(n)=phi(n+1), in C. Rivera's Primepuzzles. Kevin Ford, Solutions of phi(n) = phi(n+k) and sigma(n) = sigma(n + k), arXiv:2002.12155 [math.NT], 2020. FORMULA A000010(a(n)) = A000010(a(n)+7). MATHEMATICA Select[Range[100000], EulerPhi[#] == EulerPhi[# + 7] &] (* Vincenzo Librandi, Sep 08 2016 *) PROG (PARI) {op=vector(N=7); for( n=1, 1e5, if( op[n%N+1]+0==op[n%N+1]=eulerphi(n), print1(n-N, ", ")))} (MAGMA) [n: n in [1..100000] | EulerPhi(n) eq EulerPhi(n+7)]; // Vincenzo Librandi, Sep 08 2016 CROSSREFS Cf. A000010, A001274, A001494, A179186, A179187, A179188, A007015. Sequence in context: A098597 A097038 A049114 * A030735 A303189 A162462 Adjacent sequences:  A179186 A179187 A179188 * A179190 A179191 A179192 KEYWORD nonn AUTHOR M. F. Hasler, Jan 05 2011 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.

Last modified September 23 08:18 EDT 2020. Contains 337295 sequences. (Running on oeis4.)