OFFSET
1,1
EXAMPLE
51 is in the sequence because prime(51) = 233 and phi(51) = 32.
20070 is in the sequence because prime(20070) = 225583 and phi(20070) = 5328.
PROG
(PARI) s=[]; for(n=1, 30000, if(vecsort(digits(prime(n)), , 8) == vecsort(digits(eulerphi(n)), , 8), s=concat(s, n))); s
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Colin Barker, Jun 05 2014
STATUS
approved