OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1200
Kevin Ford, Solutions of phi(n) = phi(n+k) and sigma(n) = sigma(n + k), arXiv:2002.12155 [math.NT], 2020.
MATHEMATICA
Select[Range[15000], EulerPhi[#] == EulerPhi[# + 10] &]
PROG
(Magma) [n: n in [1..20000] | EulerPhi(n) eq EulerPhi(n+10)];
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Sep 08 2016
STATUS
approved