OFFSET
1,1
LINKS
Colin Barker, Table of n, a(n) for n = 1..3000
EXAMPLE
108 is in the sequence because phi(108) = 36, which has no digits in common with 108.
MATHEMATICA
Select[Range[200], Intersection[IntegerDigits[#], IntegerDigits[EulerPhi[#]]]=={}&] (* Harvey P. Dale, Feb 19 2024 *)
PROG
(PARI) s=[]; for(n=1, 300, if(setintersect(vecsort(digits(n), , 8), vecsort(digits(eulerphi(n)), , 8))==[], s=concat(s, n))); s
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Colin Barker, Jun 03 2014
STATUS
approved