# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a082060 Showing 1-1 of 1 %I A082060 #20 Jan 31 2022 18:14:34 %S A082060 1,21,63,101,233,291,502,677,1021,1031,1051,1061,1091,1201,1226,1301, %T A082060 1601,1801,1901,2011,2201,2333,2383,2393,2518,2633,2677,2700,2767, %U A082060 2817,2833,2991,3011,3023,3122,3203,3253,3323,3623,3677,3767,3823,3923,3989 %N A082060 Numbers n such that n and phi(n) have the same distinct decimal digits. %C A082060 Contains A113781 as a subsequence. - _M. F. Hasler_, Nov 28 2007 %C A082060 Numbers n such that n and phi(n) have the same decimal digits = A115921. - _Jaroslav Krizek_, Nov 13 2014 %H A082060 Harvey P. Dale, Table of n, a(n) for n = 1..2500 %e A082060 n=502 is a member since phi[502]=250 %t A082060 Select[Range[4000],Union[IntegerDigits[#]]==Union[IntegerDigits[ EulerPhi[ #]]]&] (* _Harvey P. Dale_, Jan 31 2022 *) %o A082060 (PARI) for(n=1,10^4,if(Set(Vec(Str(n)))==Set(Vec(Str(eulerphi(n)))),print1(n", "))) \\ _M. F. Hasler_, Nov 28 2007 %o A082060 (Python) %o A082060 from sympy import totient %o A082060 A082060_list = [n for n in range(1,10**4) if set(str(totient(n))) == set(str(n))] # _Chai Wah Wu_, Dec 13 2015 %Y A082060 Cf. A000005, A000010, A082059, A115921, A113781, A113622, A069215, A072395, A113781. %K A082060 base,nonn %O A082060 1,2 %A A082060 _Labos Elemer_, Apr 04 2003 %E A082060 Definition and comment corrected by _Jaroslav Krizek_, Nov 13 2014 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE