|
|
A216385
|
|
Number of values of k for which phi(k) is a permutation of decimal digits of k, for k < 10^n.
|
|
0
|
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(3) = 5 because the values of k satisfying the condition for k < 10^3 are {1, 21, 63, 291, 502}. - V. Raman, Feb 17 2014
|
|
PROG
|
(PARI) a(n)=sum(k=1, 10^n, vecsort(digits(k)) == vecsort(digits(eulerphi(k)))) \\ Use digits(n)=eval(Vec(Str(n))) in old versions of PARI. - V. Raman, Feb 17 2014, based on edits by M. F. Hasler
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|