login
A082060
Numbers n such that n and phi(n) have the same distinct decimal digits.
4
1, 21, 63, 101, 233, 291, 502, 677, 1021, 1031, 1051, 1061, 1091, 1201, 1226, 1301, 1601, 1801, 1901, 2011, 2201, 2333, 2383, 2393, 2518, 2633, 2677, 2700, 2767, 2817, 2833, 2991, 3011, 3023, 3122, 3203, 3253, 3323, 3623, 3677, 3767, 3823, 3923, 3989
OFFSET
1,2
COMMENTS
Contains A113781 as a subsequence. - M. F. Hasler, Nov 28 2007
Numbers n such that n and phi(n) have the same decimal digits = A115921. - Jaroslav Krizek, Nov 13 2014
LINKS
EXAMPLE
n=502 is a member since phi[502]=250
MATHEMATICA
Select[Range[4000], Union[IntegerDigits[#]]==Union[IntegerDigits[ EulerPhi[ #]]]&] (* Harvey P. Dale, Jan 31 2022 *)
PROG
(PARI) for(n=1, 10^4, if(Set(Vec(Str(n)))==Set(Vec(Str(eulerphi(n)))), print1(n", "))) \\ M. F. Hasler, Nov 28 2007
(Python)
from sympy import totient
A082060_list = [n for n in range(1, 10**4) if set(str(totient(n))) == set(str(n))] # Chai Wah Wu, Dec 13 2015
KEYWORD
base,nonn
AUTHOR
Labos Elemer, Apr 04 2003
EXTENSIONS
Definition and comment corrected by Jaroslav Krizek, Nov 13 2014
STATUS
approved