1,2

Altug Alkan, Table of n, a(n) for n = 1..100000

(PARI) A047726(n) = n=eval(Vec(Str(n))); (#n)!/prod(i=0, 9, sum(j=1, #n, n[j]==i)!);

A007953(n) = sumdigits(n);

a(n) = A007953(n)*A047726(n);

Cf. A007953, A045876, A047726.

Sequence in context: A177895 A238986 A227876 * A189506 A173529 A273005

Adjacent sequences: A276713 A276714 A276715 * A276717 A276718 A276719

nonn,base,look

Altug Alkan, Sep 17 2016

approved